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About This Manual 


Purpose 


This manual provides information on how to perform GETSTATUS and SETSTATUS 
calls. These calls are a subset of Data Communications ALGOL (DCALGOL). 
GETSTATUS allows you to retrieve specific and general information about jobs, 
tasks, the status of peripheral and disk units, the status of the operating system and 
mainframe configuration, and the files in the disk directory. SETSTATUS provides 
you with interface form control of mix, unit, and operational functions from an object 
program. 


Scope 


This manual applies to all Unisys A Series computer systems. 


Audience 


This manual is written for system programmers. 


Prerequisites 


This manual assumes that you are proficient at using ALGOL, especially POINTER and 
hexadecimal constructs. You should also be familiar with the system commands that are 
available to computer operators. The manual further assumes that you are familiar with 
the data communication subsystem and logical 1/0 operations, which include message 
and file manipulation. 


How to Use This Manual 


This manual is intended to be used a reference source, not as a task-based set of 
instructions. It is to be accessed randomly. 


Information returned by the GETSTATUS intrinsic is sometimes taken directly from 


Master Control Program (MCP) tables. The format and meaning of these tables are 
subject to changes between MCP releases. 
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The standard arithmetic operators are used in this manual as follows: 


Operator Meaning 

+ Addition 

= Subtraction 

* Multiplication 

/ Division 
Organization 


vi 


This manual is divided into two parts, one for GETSTATUS calls and the other for 
SETSTATUS calls. In turn, the GETSTATUS and SETSTATUS calls are organized by 
functional type such as mix entries, miscellaneous requests, unit requests, and so on. A 
glossary, a bibliography, and an index appear at the end of this manual. 


Part 1. GETSTATUS Calls 
This part of the manual describes GETSTATUS calls. 


Section 1. General Information on GETSTATUS 
This section provides general information about GETSTATUS calls. 


Section 2, GETSTATUS Request Type 0 (Mix Entries) 
This section describes the various GETSTATUS calls for mix entries. 


Section 3. GETSTATUS Request Type 2 (Miscellaneous Requests) 


This section describes the various GETSTATUS calls for miscellaneous requests. Not all 
miscellaneous requests are documented. 


Section 4. GETSTATUS Request Type 3 (Directory Calls) 
This section describes the various directory calls that you can make with GETSTATUS. 


Section 5. GETSTATUS Request Type 4 (Disk and Tape Volumes) 
This section describes the various GETSTATUS calls for disk and tape volumes. 


Section 6. GETSTATUS Request Type 5 (Unit Requests) 
This section describes the various GETSTATUS calls for unit types. 


Part 2. SETSTATUS Calls 
This part of the manual describes SETSTATUS calls. 
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Section 7. General Information on SETSTATUS 
This section provides general information about SETSTATUS calls. 


Section 8. SETSTATUS Request Type 0 (Mix Entries) 
This section describes the various SETSTATUS calls for mix entries. 


Section 9. SETSTATUS Request Type 2 (Miscellaneous Requests) 


This section describes the various SETSTATUS calls for miscellaneous requests. Not all 
miscellaneous requests are documented. 


Section 10. SETSTATUS Request Type 3 (Directory Requests) 
This section describes the various SETSTATUS calls for archive directory requests. 


Section 11. SETSTATUS Request Type 4 (Disk and Tape Volumes) 
This section describes the various SETSTATUS calls for disk and tape volumes. 


Section 12. SETSTATUS Request Type 5 (Unit Requests) 
This section describes the various SETSTATUS calls for unit types. 


Appendix A. Hard Errors 
This appendix contains a list of hard error numbers and their meanings. 


Appendix B. Soft Errors 
This appendix contains a list of soft error numbers and their meanings. 


Appendix C. Hardware Resource Codes and Unit Type Codes 
This appendix contains a list of hardware resource codes and unit type codes that are 


used by GETSTATUS and SETSTATUS calls. 


Appendix D. Example of a GETSTATUS Directory 
This appendix contains an example of a GETSTATUS directory. 
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Related Product Information 


vill 


A Series ALGOL Programming Reference Manual, Volume 1: Basic 
Implementation (form 8600 0098) 


This manual describes the basic features of the Extended ALGOL programming 
language. This manual is written for programmers who are familiar with programming 
concepts. 


A Series DCALGOL Programming Reference Manual (form 8600 0841) 


This manual describes the Data Communications ALGOL (DCALGOL) language. This 
language is designed to support the implementation of message control systems (MCSs) 
and other resource monitoring and controlling programs that require access to special 
operating system interfaces. This manual is written for systems programmers. 


A Series File Attributes Programming Reference Manual (form 8600 0064). 
Formerly the A Series I/O Subsystem Programming Reference Manual 


This manual contains information about each file attribute and each direct I/O buffer 
attribute. The manual is written for programmers and operations personnel who need 
to understand the functionality of a given attribute. The A Series I/O Subsystem 
Programming Guide is a companion manual. 


A Series I/O Subsystem Programming Guide (form 8600 0056). Formerly the 
A Series I/O Subsystem Programming Reference Manual 


_ This guide contains information about how to program for various types of peripheral 


files and how to program for interprocess communication, using port files. This guide is 
written for programmers who need to understand how to describe the characteristics of 
a file ina program. The A Series File Attributes Programming Reference Manual isa 
companion manual. 


A Series Security Administration Guide (form 8600 0973) 


This guide describes systems-level security features and suggests how to use them. It 
provides administrators with the information necessary to set and implement effective 


- security policy. This guide is written for system administrators, security administrators, 


and those responsible for establishing and implementing security policy. 


A Series System Commands Operations Reference Manual (form 8600 0395) 


This manual gives a complete description of the system commands used to control 
system resources and work flow. This manual is written for systems operators and 
administrators. 


A Series SYSTEMSTATUS Programming Reference Manual (form 8600 0452) 


This manual documents the SYSTEMSTATUS intrinsic of the Master Control Program 
(MCP). The SYSTEMSTATUS intrinsic provides information that can be used to 
efficiently monitor the performance of a running system. This manual is written for 
systems programmers. 
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A Series Task Attributes Programming Reference Manual (form 8600 0502). 
Formerly the A Series Work Flow Administration and Programming Guide 


This manual describes all the task attributes available on A Series systems. It also gives 
examples of statements for reading and assigning task attributes in various programming 
languages. The A Series Task Management Programming Guide is a companion 
manual. 


A Series Work Flow Language (WFL) Programming Reference Manual 
(form 8600 1047) 


This manual presents the complete syntax and semantics of WFL. WFL is used to 
construct jobs that compile or run programs written in other languages and that perform 
library maintenance such as copying files. This manual is written for individuals who 
have some experience with programming in a block-structured language such as ALGOL 
and who know how to create and edit files using CANDE or the Editor. 
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Section 1 
General Information on GETSTATUS 


The GETSTATUS intrinsic allows the user to retrieve specific and general information 
about jobs, tasks, the status of peripheral and disk units, the status of the operating 
system and mainframe configuration, and the files in the disk directory. In general, 
the GETSTATUS intrinsic can be employed only by a privileged process. However, 
some directory information (Request Type 3), volume library information (Request 
Type 4), and selected miscellaneous information (Request Type 2) can be requested by 
nonprivileged processes. 


The GETSTATUS intrinsic is referenced as a type Boolean procedure with four 
parameters as follows: . 


BOOL := GETSTATUS (TYPE, SUBCLASS, MASK, ARY); 


The TYPE, SUBCLASS, and MASK arguments are single-precision, REAL variables. 
ARY is a single-precision, REAL array row. 


In the following descriptions of various GETSTATUS calls, two fields belonging to the 
TYPE parameter are referred to by the following names: 


e Request Type refers to the field [7:8] of the TYPE parameter. 
e SUBTYPE refers to the field [15:8] of the TYPE parameter. 


GETSTATUS Request Types 


GETSTATUS functions are grouped into major categories by Request Type. The 
Request Type categories currently implemented are as follows: 


Request Type - Description 

0 Mix requests. These requests retrieve information about processes in the 
system. 

1 Reserved. 

2 Miscellaneous requests. 

3 Directory requests. These requests retrieve information about disk files, | 
disk directories, and cataloged disk or tape information. 

4 Volume library requests. These requests retrieve information about disk 
and tape volumes from the volume library and the volume directory. 

5 Unit requests. These requests retrieve information about peripheral 1/0 
units. 


Each Request Type category is further broken down into specific SUBTYPEs for 
obtaining specific information. These SUBTYPEs are discussed in detail as part of the 
explanation for each Request Type. 
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Unless otherwise indicated, the process that is called must have been initiated from an 
ODT or must be privileged to use Request Types 0, 2, or 5. Unless otherwise indicated, a 
nonprivileged process can use Request Types 3 and 4. 


Array Limits 


The array parameter ARY can be a segmented or alongarray. For all GETSTATUS 
calls, the value ARY[0].[19:20] must be greater than 1. If ARY[0].[19:20] is less than 2, 
GETSTATUS returns hard error 35: Boolean (1 & 35 [11:08]). 


For all GETSTATUS calls, the value ARY[0].[19:20] must be less than SIZE(ARY) 

in words. If ARY[(0].[19:20] is greater than or equal to SIZE(ARY), GETSTATUS 
returns hard error 36: Boolean (1 & 36 [11:08]). If bit 47 of the TYPE parameter is ON, 
ARY[0].[19:20] must be less than SIZE(ARY)— 3. Otherwise, hard error 36 is returned. 


For all GETSTATUS calls, ARY[0].[89:20] must be less than ARY[0].[19:20]. Otherwise, 
hard error 42: Boolean (1 & 42 [11:08]) is returned. 


Additional Words (ADDLWORDs) 


Some requests for the GETSTATUS intrinsic require or might optionally use more 
than one word per logical entry to describe the request. The caller indicates the 
presence of additional words by storing a count of them in the field VALUEF ([38:06]) 
of certain words in the array ARY. In this subsection, the additional words are called 
ADDLWORD(1), ADDLWORD(2), and so forth. 


Additional information cannot be supplied for requests that require GETSTATUS 
to generate the entire response after starting at some given point. For example, on 
directory requests (TYPE = 3), ADDLWORDs can be supplied only for SUBTYPE = 0. 


Substandard Form Names 


The parameters and results for some GETSTATUS calls use substandard form names. 
A substandard form name is a one-byte binary character count followed by the EBCDIC 
characters of the name. The parameters and results for other GETSTATUS calls use 
standard form names. A standard form name is coded in binary with lengths and codes. 
For additional information about standard forms, refer to the DISPLAYTOSTANDARD 
function in the A Series DCALGOL Programming Reference Manual. 


Optional Dynamic MASK and SUBCLASS Values 


MASK and SUBCLASS values other than the ones entered as the MASK and 
SUBCLASS parameters can be designated by placing one or more substitute pairs of 
values in the array ARY. The substitutes are placed in the array ARY starting at word 
ARY[1]. The number of words used for substitute MASK and SUBCLASS values should 
be indicated by the value of ARY[0].[89:20]. This field is normally 0; GETSTATUS 
assumes that the first information can be found (or is to be returned) relative to word 1. 
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However, if ARY[0].[89:20] is not 0, the assumed first word location is shifted to the 
value specified in ARY[0].[39:20]. When you use this technique, you should increase 
ARY([0].[19:20] by a corresponding amount. 


- The first word of each pair becomes the dynamic MASK, and the second word becomes 
the SUBCLASS value. Each parameter entry above ARY[0].[39:20] selects the 
particular MASK and SUBCLASS to be used with an index value in the ADDLINFOF 
([46:08]) field. When the ADDLINFOF field of a parameter word in the array ARY is not 
equal to 0, the MASK and SUBTYPE parameters are changed. For example, suppose 
that ADDLINX is the value of the ADDLINFOF field in a parameter word. Then MASK 
is replaced by ARY [ADDLINX], and SUBCLASS is replaced by ARY [ADDLINX + 1]. 
The ADDLINFOF fields in the parameter words are not preserved in the returned 
results. 


Error Detection 


Bit 0 of the Boolean value returned by GETSTATUS indicates whether or not an 
error occurred while GETSTATUS was processing a request. When bit 0 is turned 

on, GETSTATUS detected either a soft error or a hard error. If the field [11:08] of 
the Boolean result equals 0, then a soft error occurred. When a soft error occurs, 
GETSTATUS stores one or more soft error words in the array ARY. Depending on the 
specific Request Type and SUBTYPE of the call, GETSTATUS stores coded result 
words in the array. These result words are described for each individual Request Type 
later in this manual. Instead of a coded result word, GETSTATUS might store a soft 
error word when necessary. A soft error word can be recognized because the ERRORF 
bit (bit 47) is turned on. Further examination of the ERRORVALUFF field [46:08], 
which is within the soft error word, indicates the type of soft error. Appendix B contains 
a list of all the possible soft errors that can be returned. 


If the field [11:08] of the Boolean result is not 0, GETSTATUS encountered a hard error. 
GETSTATUS was unable to complete the original request, and you should not rely on 
any information returned by GETSTATUS in the array ARY. Appendix A contains a list 
of all the possible hard errors that can be returned. 
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Section 2 
GETSTATUS Request Type 0 
(Mix Entries) 


GETSTATUS mix requests are grouped under Request Type 0. These GETSTATUS 
calls retrieve information about the status of processes (jobs, tasks, libraries, and so 
on) in the system. For example, the controller uses these calls to generate displays 
for the system commands MX (Mix Entries), W (Waiting Mix Entries), and Y (Status 
Interrogate). For information on these and any other system commands, refer to the 
A Series System Commands Operations Reference Manual. 


To completely understand this discussion of GETSTATUS mix type calls, you should 

be familiar with terms such as stack number and independent runner and with task 
attributes. These concepts are explained in the A Series Task Attributes Programming 
Reference Manual. 


To use mix calls, the calling process must have privileged status or must have been 
started from an ODT with a WFL JOB or RUN statement, but not with a primitive 
??RUN system command. Otherwise, a security error occurs and GETSTATUS returns 
hard error 43 (refer to Appendix A). 

The general form of the GETSTATUS call is as follows: 


B := GETSTATUS (TYPE, SUBCLASS, MASK, ARY); 


Parameters 


TYPE 


The following parameters are needed to make GETSTATUS calls about mix entries. 


This parameter generally selects the specific case and subcase within the GETSTATUS 
intrinsic. For mix requests, the fields within the word are as follows: 


Word Field Value Description 
TYPE.TYPEF [7:08] ) Selects Request Type O. 
TYPE.SUBTYPEF (15:08) 6) Retrieves information for a 


designated list of mix numbers. 


1 Retrieves information 
corresponding to a sequence of 
stack numbers starting at a 
designated stack number. 


continued 
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continued 
Word Field Value Description 


2 Retrieves information about a 
process and the siblings and 
descendents of that process. 


3 Returns a structured summary list 
of processes scheduled for 
execution, processes waiting for 
operator intervention, processes 
that are active, processes that are 
libraries, and database stacks. 


4 Retrieves information for a 
designated list of stack numbers. 


5 Returns a structured summary list 
of processes scheduled for 
execution, processes waiting for 
operator intervention, processes 
that are active, processes that are 
libraries, and database stacks. 


6 Reports the kind of job for a list 
of mix numbers. 


Reserved. 


8 Retrieves information about a 
process and the descendents of 
that process. 


9 Retrieves the USERCODE and 
processor time for a list of stack 
numbers. 


TYPE.GSORGUNITF [31:16] Varies For SUBTYPEs 2, 3, 5, and 8, 
GETSTATUS checks the 
ORGUNIT attribute of processes 
before it reports the processes. If 
the caller process is privileged, 
the GSORGUNITF field can be 
used by the caller to limit the 
report. if the GSORGUNITF field 
is not O, GETSTATUS reports only 
on processes with an ORGUNIT 
value that matches the values in 
TYPE.GSORGUNITF. If the caller 
is privileged and the 
GSORGUNITF field is 0, no limits 
are applied. If the caller is not 
privileged (and the process was 
started from an ODT), the report 
is limited to processes with the 
same ORGUNIT as the caller. 


continued 
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continued 
Word 
TYPE.RETURNRAWF 


TYPE.GSMLSLANGF 
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Description 


If you turn this bit on, 
GETSTATUS returns the RSVP 
and DISPLAY messages of a 
program in an untranslated 
format. These messages are 
those returned if you turn on 

bit 12 (for RSVP) or 13 (for 
DISPLAY) in the MASK parameter 
for SUBCLASS 1 or 2. 


if you turn this bit on, you must 
place in the array ARY the name 
of the native language into which 
the multilingual system (MLS) 
display and RSVP messages are 
to be translated. The language 
should appear in the array 
starting at word SIZE (ARY)-6 of 
the array. The language should 
consist of a 1-byte binary length 
indicator followed by 1 to 17 
EBCDIC characters. 


If you turn this bit off, if the 
length indicator is 0, or if the 
message is not. available in the 
requested language, the 
translation is to be done with the 
LANGUAGE parameter of the 
calling process, the 
SYSTEMLANGUAGE system 
command, or the language in 
which the message is written. 


continued 
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continued 
Word Field Value Description 
TYPE.GSORGUSERF [47:01] 1 The report is limited to processes: 


running under a designated 
usercode. The usercode 
limitation does not apply to 
SUBTYPEs 6 or 9. If a usercode 
is designated, GETSTATUS does 
not report message control 
system (MCS) processes. The 
caller should place the usercode 
in the last three words of the 
array ARY starting at word SIZE 
(ARY)—3. The usercode should 
appear in the following form: 

< character count > 
<usercode-ID >. The variable 
<character count> is a 1-byte 
binary number that gives the 
number of characters in the 
usercode ID. The variable 
<usercode-ID> is the usercode 
in EBCDIC characters. 


TYPE.GSORGUSERF [47:01] 0 If GSORGUSERF is O or if 
<character count> is 0, the mix 
report is not limited by the 
usercode. 


SUBCLASS 


MASK 


2-4 


For SUBTYPEs 0, 1, 2, 4, and 8, the caller selects one of the two MASK tables to be 
used with SUBCLASS. For SUBTYPEs 0, 1, 2, 3, 4, 5, and 8, the sign bit (bit [46:01]) 

of SUBCLASS determines if GETSTATUS is to report invisible independent runners. 
If the sign bit is turned on, SUBCLASS is negative, and GETSTATUS can report the 
invisible independent runners; if the sign bit is turned off, GETSTATUS does not report 
them. 


For SUBTYPEs 0, 1, 2, 4, and 8, the MASK parameter is used to select the process 


attributes and status information to be retrieved by GETSTATUS. Each bit that is 


turned on in the MASK parameter instructs GETSTATUS to report the corresponding 
task attribute (refer to Table 2-1 and Table 2-2 for a listing of valid MASK bits and 
their uses). For SUBTYPE 5, bits in the MASK parameter are used to select the sets of 
processes that are to be reported (refer to Table 2-3). 
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Array ARY Parameter 


The caller should place information such as mix numbers or stack numbers, usercode, 
and so forth, in the array ARY to indicate to GETSTATUS the tasks that are to be 
reported. In turn, GETSTATUS stores the retrieved status and attribute information 
into the array ARY. The exact format of the array parameter and result information is 
described later in this section under the description of each particular SUBTYPE. 


Request Type 0 Calls by SUBTYPE 


The following Request Type 0 (mix entry) calls are grouped by SUBTYPE because they 
are functionally related and share common characteristics. 


SUBTYPE 0, 1, 2, 4, and 8 Calls (Designated Processes) 


SUBTYPEs 0, 1, 2, 4, and 8 return information about one or more designated processes. 
The information returned depends on the SUBCLASS in the MASK parameter, 
GETSTATUS returns available information that corresponds to the bit for each task 
reported. The SUBCLASS parameter selects the requested task attribute from the 
two available choices. If SUBCLASS equals plus or minus one, the information found 
in Table 2-1 applies. If SUBCLASS equals plus or minus two, the information found in 
Table 2-2 applies. 


General Input Information 
Some of the values reported in Tables 2—1 and 2-2 correspond exactly to task attributes. 
Other values are related to task attributes or status. These latter values are mainly for 


internal use by the Master Control Program (MCP) and might change in future releases. 


In the two status information tables that follow, the link format for mix requests is as 


follows: 
Word Field Description 
GSINFOF [15:16] Length in bytes of the item linked. 
XSLINKF [32:17] Word offset to the beginning information in the 


array ARY. When this offset is added to the base, 
it gives the index of the information. Refer to 
Figure 2-1. 


Many of these links point to a name that is in standard form. Fora description of 
standard form, refer to the DISPLAYTOSTANDARD function in the DCALGOL 
Reference Manual. 
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Table 2-1. Status Information Reported for SUBCLASS 1 


MASK Bit Description 


MASK bit 0 is not used. 

Bits [47:12] contain the stack number of the process. 
Bits [31:16] contain the JOBNUMBER attribute or 0. 
Bits [15:16] contain the MIXNUMBER attribute or 0. 


For a compiler process, a link to the NAME task attribute of the 
process in standard form. 


For compiler processes, a link to the NAME task attribute of the 
code file being compiled in standard form. For a process that is not 
a compiler process, a link to the NAME task attribute of the process 
in standard form. 


PRIORITY task attribute. 


Stack state, similar to the STATUS task attribute, but the numerical 
codes are different: 


@ 2 = Terminating 
e 3 = Scheduled 
e 4 = Being initiated 
e 5 = Segment dictionary 
e 6 = To be continued 
e@ 7 = Frozen library 
8 = Waiting for event or task 
9 = Waiting for software interrupt (HOLDING) 
12 = Special wait (ASLEEP) 
13 = Ready for swap-in 
@ 14 = Ready-queued 
e 15 = Processor is running program now 


For more information, refer to the system command Y (Status 
interrogate) in the System Commands Reference Manual. 


RSVP reply mask. If bit [47:01] is turned on, the process has an 
active RSVP. 


Bit [47:01] is turned on for MCS. If the process is an MCS, bits 
[46:07] contain the MCS number. 


1 if process has produced a display. 


continued 
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Table 2—1. Status Information Reported for SUBCLASS 1 (cont.) 


MASK Bit Description 


Bit [0:01] is turned on if the task is visible —that is, if it is not an 
invisible system process. Bit [1:01] is turned on if the process is 
suppressed from the mix picture. Refer to the system command 
SUPPRESS (Suppress Display) in the System Commands 
Reference Manual. 


For a compiler process, if the compiler code file has a usercode, a 
link to that usercode in standard form. 


For a compiler process, if the NAME task attribute of the code file 
being compiled has a usercode, a link to that usercode in standard 
form. For a process that is not a compiler process, if the NAME task 
attribute of the process has a usercode, a link to that usercode in 
standard form. . 


Link to the RSVP message. If the TYPE.GSRETURNRAWF bit is off, 
the link word refers to the plain message text. If the 
TYPE.GSRETURNRAWF bit is turned on, the link word refers to an 
area as follows: 


e Word 0 = Task mix number 
e Word 1 = Internal MCP message number 
e Word 2 = Start of untranslatable message 


Link to the most recent DISPLAY message. The format is the same 
as for the RSVP message (MASK bit 12). 


MASK bit 14 is reserved. 

Bits [15:16] ORGUNIT or 0. 

Bits [39:16] DESTSTATION or 0. 

Word of information concerning tape RESOURCE task attribute. 
Word of information concerning tape RESOURCE task attribute. 
Number of processes sharing a library or process stack. 


Link to MCS name (in standard form) of the originating MCS. This is 
the MCSNAME attribute of the task. 


Link to the station name in (standard form) that originated the task. 
This is the SOURCENAME attribute of the task. 


Link to the IDENTITY code file attribute of the process in standard 
form. 


MASK bit 22 is reserved. 


Link to the USERCODE task attribute of the process in standard 
form. 


continued 
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Table 2-1. Status Information Reported for SUBCLASS 1 (cont.) 


MASK Bit Description 


Bit [0:01] contains the CHECKPOINTABLE task attribute. 
Bits [4:04] contain the BRCLASS task attribute. 


Bits [8:04] contain a code for the check point status displayed by 
the system command BR (Breakout): 


@ 0 = Checkpointable 

@ 1 = Checkpoint requested 
e@ 2 = Checkpoint running 
@ 3 = Checkpoint running 
e 4 = Restarting (program) 
e 5 = Restarting (once only) 
e 6 = Restarting (multiple) 


Link to the CHARGE task attribute code of the process in standard 
form. 


Link to the ACCESSCODE task attribute of the process in standard 
form. 


ORGUNIT task attribute. 
DESTSTATION task attribute. 


Count of actual segment descriptors (ASDs) in use by the process. 
For more information, refer to the system command ASDU (ASDU 
Usage) in the System Commands Reference Manual. 


Count of maximum number of ASDs in use at one time by the 
process. 


Word of information concerning the LIBRARYSTATE task attribute. 


For a scheduled task, the TIME (14) value when the task was 
scheduled. 


lf bit 47 of the word is turned on, this word contains the mix 
number of the fast-tasking worker process. Otherwise, this word 
contains the mix number of the fast process. 


If the process is a library stack, this word will return a list of the 
process stack numbers that are using the library. A link word is 
returned that points to a word in the array that contains the number 
of processes that are linked followed by the stack number of each 
process. 


continued 
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Table 2-1. Status Information Reported for SUBCLASS 1 (cont.) 


MASK Bit Description 


This bit returns one word of information as follows: 


e [0:01] = If turned on, bits [47:12] contain the job queue from 


which the task originated. 
[01:01] = Is turned on if the stack is a database stack. 
{02:01] = Is turned on if the parent job of the task is a session. 


[03:01] = Is turned on if the task is a privileged user. 


Table 2-2. Status Information Reported for SUBCLASS 2 


MASK Bit Description 


MASK bit 0 is not used. 

Bits [47:12] contain the stack number of the process. 
Bits [31:16] contain the JOBNUMBER task attribute or 0. 
Bits [15:16] contain the MIXNUMBER task attribute or 0. 
MASK bit 2 is reserved. 

Compiler information. 

MAXPROCTIME task attribute. 

ACCUMPROCTIME task attribute (in 2.4-microsecond units). 
MAXIOTIME task attribute (in 2.4-microsecond units). 
ACCUMIOTIME task attribute (in 2.4-microsecond units). 
ACTIVETIME task attribute (in 2.4-microsecond units). 


© ON OA WDaA wn 


Time of day when process started (in terms of 2.4-microsecond 
intervals of time). 


TARGET task attribute. 
CORE task attribute. 
Link to the RSVP message. 


eS = = 
WO NM KF OO 


Link to the display message. 


— 
> 


Words of memory assigned to the process. 


he 
oO 


Words of save memory assigned to the process. 


continued 
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Table 2-2. Status Information Reported for SUBCLASS 2 (cont.) 


MASK Bit Description. 


For a scheduled process, the time (in 2.4-microsecond intervals of 
time) that the task has been in the schedule; otherwise, the 
ELAPSEDTIME task attribute (in 2.4-microsecond intervals of time). 


Information concerning the parent, siblings, and descendents. 


Bits [35:12] contain the stack number of the parent or 0. 


Bits [23:12] contain the stack number of an older sibling or 0. 
Bits [11:12] contain the stack number of an offspring or 0. 
TASKVALUE task attribute. 
HISTORY task attribute. 
Similar to STATUS task attribute: 
e 1 = If scheduled 

e 3=fKf suspended 

e 2 = Otherwise 
MASK bit 21 is reserved. 
LOCKED task attribute. 
STOPPOINT attribute. 
24 MASK bit 24 is reserved. 
Bits [15:16] ORGUNIT or 0. 
Bits [39:16] DESTSTATION or 0. 
Bits [15:16] contain the STATION task attribute. 
Bits [33:02] contain the TANKING task attribute. 
Bit [46:01] contains the AUTOSWITCHTOMARC task attribute. 
Bit [47:01] contains the DISPLAYONLYTOMCS task attribute. 
OPTION task attribute. 
ERROR task attribute. 
RESTART task attribute. 
Link to the USERCODE task attribute in standard form. 


Link to two words in the array. The first word contains the tag value 
of the stack cell. The second word contains the 48 data bits of the 
stack cell. This MASK bit corresponds to the system command 

OT (Inspect Stack Cell) <number>. The variable <number> is the 
number of the stack cell that is to be returned and is specified in 
ADDLWORD(2). 


continued 
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Table 2-2. Status Information Reported for SUBCLASS 2 (cont.) 


MASK Bit Description 


MASK bit 32 is reserved. 
Size of the segment dictionary stack for the process (in words). 


Amount of memory in use by the segment dictionary for the process 
for code and value arrays. | 


Amount of save memory in use by the segment dictionary for the 
process. 


MASK bit 36 is reserved. 
MASK bit 37 is reserved. 
MASK bit 38 is reserved. 
SAVECORELIMIT attribute. 


Maximum amount of save memory used by the process. 


MASK bit 41 is reserved. 


’ Bit [0:01] is turned on if the process is a compiler. 


Total time (in 2.4-microsecond intervais of time) that the process 
has spent in the ready queue. For more information, refer to the 
system command TI (Times) in the System Commands 
Reference Manual. 


Link to four words of presence-bit-processing statistics. The first 
word is the processor time (in 2.4-microsecond intervals of time) 
used for initial presence-bit operations. The second word is a count 
of the number of initial presence-bit interruptions. The third word is 
the amount of processor time (in 2.4-microsecond intervals of time) 
used for presence-bit operations other than initial presence-bit 
operations. The fourth word is the count of other presence bits. ‘For 
more information, refer to the system command TI (Times) in the 
System Commands Reference Manual. 


Bit [0:01] contains the CHECKPOINTABLE task attribute. 
Bits [4:04] contain the BRCLASS task attribute. 


continued 
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Table 2-2. Status Information Reported for SUBCLASS 2 (cont.) 


MASK Bit Description . 


Bits [8:04] contain a code for the check point status displayed by 
the system command BR (Breakout): 


e 0 = Checkpointable 

e 1 = Checkpoint requested 

@ 2 = Checkpoint running 

e 3 = Checkpoint running 
'@ 4 = Restarting (program) 

e 5 = Restarting (once only) 

e 6 = Restarting (multiple) 
_ORGUNIT task attribute. | 

DESTSTATION task attribute or 0. 


General Results Returned for SUBTYPE 0, 1, 2, 4, and 8 Calls 
GETSTATUS returns one of two kinds of result words in the array ARY for each process 
that is reported, soft error words and stack info pointer words. 

‘Soft Error Word 
If the GSERRORF bit ([47:01]) of the word is turned on, an error prevented 
GETSTATUS from reporting on the process. This bit distinguishes a soft error word 
from a stack info pointer word. The GSERRORVALUFF field ([46:08]) contains the soft 
error code (refer to Appendix B). 

Stack Info Pointer Word 


A stack info pointer word points to the information for the process and contains the 
stack number that identifies the process. Stack info pointer words are structured as 


follows: 
Word Field Description 
GSERRORF [47:01] The bit is turned off. 
GSADDLINFOF [46:08] For SUBTYPEs 1 and 4, GETSTATUS 


makes the GSADDLINFOF field of the 
stack info pointer word equal to the 
GSADDLINFOF field of the corresponding 
stack or mix number request word that the 
caller originally supplied. . 


continued 
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continued 
Word Field Description 


GSLEVELF [38:06] For SUBTYPEs 2 and 8, GETSTATUS 
stores the relative level of descendent 
processes reported in the GSLEVELF field. 
The designated process and siblings of the 
process designated by the caller are 
reported as level 0, direct descendents of 
the designated process and direct 
descendents of its siblings are reported as 
level 1, second generation descendents 
are reported as level 2, and so forth. 


XSLINKF [32:17] If this field is not 0, the value is the index 
or base of the validity mask, and the 
attribute list returned for the process 
follows the validity mask in the array ARY 
(refer to Figure 2-1). This field is not 0 if 
the MASK parameter has bits other than 
bit [0:01] turned on or if the call is for 
SUBTYPE O or SUBTYPE 4. 


GSINFOF [15:16] This field contains the stack number of 
the process. ; 


Figure 2-1 is a diagram of the information pointed to by the stack info pointer word. 


BASE BASE +1 BASE +2 BASE +N 


CIERY T 


Validity eeeiane 
Mask Length 
Linked 
Information 
Not Used 
Information for 
Information for MASK Bit N 


MASK Bit 1 


Figure 2-1. Information Pointed to by the Stack Info Pointer Word 


In Figure 2-1, BASE is the value contained in the XSLINKF field of the stack info 
pointer word. 


The validity mask has a bit turned on that corresponds to bits in the MASK parameter 
that are turned on for information that was successfully retrieved. 
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The variable-length linked information follows the last word referenced by the validity 
mask. GETSTATUS places information in this area for items described in the MASK 
tables (Table 2-1 and Table 2-2) with the phrase link to. Given the value of the link 
word, the caller can locate the linked information with an index calculated with one of 
the following formulas: 


INDEX 


ARY [BASE + (MASK bit number + 1)].XSLINKF + BASE; 


INDEX 


(link word).XSLINKF + BASE; 
XSLINKF equals [32:17], and INDEX is the word index that locates the beginning of the 
information. For example, the link word for display messages (MASK bit 13) is contained 
in ARY [BASE + 14)). 

SUBTYPE 0 and 4 Calls (Report for a List of Mix or Stack Numbers) 


SUBTYPE 0 retrieves information for a designated list of mix numbers. SUBTYPE 4 
retrieves information for a designated list of stack numbers. 


Input for SUBTYPE 0 and 4 Calls 


Figure 2-2 shows the format of input for SUBTYPE 0 and 4 calls: 


ARY [8] | eer 
usercode 
eo 


Optional Language 
for MLS Translation 


Mix or Stack Numbers 


: Reserved for 
and optional ADDWORDs Reeult Informacion 


Figure 2~2. Input Format for SUBTYPE 0 and 4 Calls 
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For SUBTYPE 0 and 4 calls, the information in the array ARY should be structured as 


follows: 
ARY Description 
0) The caller should store the index of the first word reserved for results in 


ARY{0].[19:20]. The results immediately follow the last mix or stack 
number or the optional ADDLWORD parameter. If the caller wants to use 
the optional dynamic MASK and SUBCLASS mechanism, he or she 
should store the index of the first word that contains a stack number or 
mix number in ARY[O].[39:20]. 


Optional Dynamic MASK and SUBCLASS Values 


The caller can optionally supply dynamic MASK and SUBCLASS parameter values 

in the array. For example, dynamic MASK and SUBCLASS values could be used 

to retrieve different information for different processes. Or dynamic MASK and 
SUBCLASS values could be used to retrieve diverse information about the same process. 
That is, because the available information is divided by SUBCLASS into two sets of 
values (refer to Table 2-1 and Table 2-2), complete information can only be obtained by 
executing two separate GETSTATUS calls (one with each SUBCLASS value) or by 
placing the mix or stack number in the array twice and using the dynamic SUBCLASS 
mechanism. 


Note that bit [46:01] (the sign bit) of the dynamic SUBCLASS values must be 0 
(positive); the sign of the original SUBCLASS parameter is used to determine if invisible 
independent runners should be reported. 


Mix Numbers or Stack Numbers and Optional ADDLWORDs 


The caller should place the list of mix numbers or stack numbers beginning either at 
ARY[1] or at the word indexed by ARY[0].[39:20], if that value is greater than 0, for the 
information that is to be retrieved. These words should be structured as follows: 


Word Field Description 


GSINFOF [15:16] For SUBTYPE 0, this value is the mix 
number in binary. For SUBTYPE 4, this 
value is the stack number in binary. 


GSVALUEF [38:06] The count of ADDLWORDs that apply for 
this mix or stack number. ADDLWORD(2) 
is used by GETSTATUS for SUBCLASS 2 
calls if MASK bit 31 is ON (stack cell 
request). 


GSADDLINFOF [46:08] The value is O or the index of the dynamic 
MASK and SUBCLASS pair to use. When 
the value in GSADDLINFOF is greater than 
0 and the value in ARY[0].[39:20] is 
greater than 1, GETSTATUS uses the 
following method to replace the MASK 
and SUBCLASS parameters. In this 
example, suppose that the value of the 
GSADDLINFOF field is 3: 


MASK := ARY [3]; 


continued 
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2-16 


continued 
Word Field Description 
SUBCLASS := ARY [3 + 1]; 


After retrieving information for a stack or 
mix number, GETSTATUS locates the next 
stack or mix number in-the array ARY by 
increasing the index with the following 
formula: 


Al := * + 1 + ARY [AI].GSVALUEF 


Al is used to index the next stack or mix 
number word in the array ARY. When Al 
exceeds the value in ARY(0].{29:20], 
GETSTATUS returns to the calling 
program. 


Area Reserved for Result Information 


The caller must reserve sufficient room in the array ARY after the last mix number 

or stack number so that GETSTATUS can return the information requested by the 
MASK bits. For example, if the highest MASK bit that is turned on is bit 15, then 17 
words are needed for each mix or stack number and extra words are necessary to report 
variable-length dinked information such as the RSVP message or process NAME. After 
copying the MLS language and usercode, or both that the caller placed at the end of 

the array, GETSTATUS might overwrite the last six words of the array with result 
information. 


If enough space has not been reserved, GETSTATUS returns an indicator. If there 
were not enough words to completely report the status of the first (or only) process, 
GETSTATUS returns hard error 41 (refer Appendix A). If the complete status for some 
process has been reported and there were not enough words in the array to report the 
status of all the requested processes, GETSTATUS stores an indicator into the first 
word of the array, as follows: 


e ARY[0].[47:01] 
This bit is turned on. 
e ARY{0].[19:20] 


This field is the index of the word that contains the mix or stack number on which 
processing stopped. The information for the indexed process does not appear in the 
array, but complete information for preceding entries does appear. 


Optional Language for MLS Translation 


If the bit for TYPE.GSMLSLANGF is turned on, the array ARY contains the native 
language into which the MLS display and RSVP messages are to be translated. The 
language should be in substandard form. The language should start at word SIZE 
(ARY)-6 of the array. 
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Optional Usercode 


If the bit for TYPE.GSORGUSERF is turned on, the report is limited to processes 
running under a designated usercode. The caller should place the usercode is 
substandard form in the last three words of the array ARY, starting at word SIZE 

— (ARY)-3. 


Results Returned for SUBTYPE 0 and 4 Calls 


GETSTATUS stores in ARY[0].[19:20] the index plus 1 of the last stack number or 
mix number processed. If there were not enough reserved words to store the result 
information for all the processes requested, bit ARY[0].[47:01] is turned on. 


GETSTATUS replaces each stack or mix number word by a soft error word or a stack 
info pointer word. The XSLINKF field of each stack info pointer word establishes the 
base at which the validity mask and process status information for that process is stored. 


SUBTYPE 1 Calls (Range of Processes) 


For SUBTYPE 1 requests, GETSTATUS returns information corresponding to MASK 
bits (as defined by the SUBCLASS parameter). GETSTATUS retrieves information 
corresponding to a sequence of stack numbers that start at a specific number. 


Input 
You should structure the input for SUBTYPE 1 requests as follows: 


e ARY[0] should contain the count plus 1 of the maximum number of processes to be 
reported. 


e ARY[1] should specify the starting stack number and the ending stack number of the 
stacks to be reported. 


ARY{1].[15:16] should contain the stack number from which to start or continue. 

If the value is 0, the report starts from the first stack in the system. Otherwise, 
GETSTATUS increases the number by 1 and starts the report from that point. 
GETSTATUS continues by increasing the stack number by 1, reporting that process, 
and so forth until the ending stack number is reached. 


When an increase in the stack number causes that number to exceed the highest 
valid stack number, the number wraps around, and the report continues from the 
first stack number. When the cycling of the stack number causes that number to 
equal the value in ARY[1].[82:17], GETSTATUS stops and returns to the caller. 


Note: Information is not reported for either the beginning stack number or 
the ending stack number. Rather, information is reported only for the 
stacks between the beginning and ending numbers. All stacks can 
be searched by specifying 0 for the beginning and ending numbers 
on the first call and then by issuing continuation calls as necessary, 
with the beginning number equal to the last number reported by the 
previous call and the ending number equal to 0. 
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Results Returned 


For a SUBTYPE 1 request, GETSTATUS stores stack information pointer words in the 
array ARY beginning at ARY[1] up to ARY [ARY [0]]. 


Then GETSTATUS stores in ARY[0].[19:20] the index plus 1 of the last stack 
information pointer word. If ARY[0].[19:20] = 1, no stacks were reported. 


If the limit of stacks specified by the caller in ARY[0] is reached before the stack number 
specified by the caller in ARY[1].[32:17] is reached or if there was not enough reserved 
space in the array to store all the information for the selected process, GETSTATUS 
turns on bit ARY[0].[47:01]. 


SUBTYPE 2 and 8 Calls (Process Families) 


2-18 


SUBTYPEs 2 and 8 return information corresponding to MASK parameter bits for 
selected processes, as determined by the SUBCLASS parameter. For SUBTYPE 8, 
GETSTATUS returns information for a designated process and for the descendents of 
that process. For SUBTYPE 2, GETSTATUS returns information about a designated 
process, the older siblings of the process, and all descendents of those siblings and all 
the descendents of the designated process. But if one of the siblings or descendents 

is running on a processor or is in the ready queue, GETSTATUS does not report any 
descendents of that process. The selection of the process is restricted by usercode if the 
parameter bit GSORGUSERF is turned on, and the selection is restricted further by the 
originating unit if the parameter field TYPE.GSORGUNITF is not 0 or if the caller is not 
privileged. 


Input 


The information in the array ARY should be structured as follows: 
ARY Description 


0 This word designates the index plus 1 of the last word of the array that 
GETSTATUS can use to return stack info pointer words. GETSTATUS 
returns validity masks and status information for sibling and descendent 
tasks. 


1 This word designates the mix number of the process. GETSTATUS 
reports that process and its descendents, and, for SUBTYPE 8, 
GETSTATUS reports the siblings of that process and their descendents. 


Results Returned 


For a SUBTYPE 1 request, GETSTATUS stores stack info pointer words in 
the array ARY beginning at ARY[1] up to ARY [ARY [0]]. Then GETSTATUS 
stores in ARY(0].[19:20] the index plus 1 of the last stack info pointer word. If 
ARY([0].[19:20] = 1, no stacks were reported. 


If the limit of stacks specified by the caller in ARY[0] is reached before all the processes 
in the family were reported or if there was not enough reserved space in the array 

to store all the information for the selected process, GETSTATUS turns on bit 
ARY[0].[47:01]. 
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SUBTYPE 3 and 5 Calls (Processes Scheduled for Execution) 


The functions for SUBTYPE 3 have been replaced by those of SUBTYPE 5, so 
SUBTYPE 3 is not be described here. 


SUBTYPE 5 returns a structured summary list of the following processes: 


e Processes that are scheduled for execution 

e Processes that are waiting for operator intervention 
e Processes that are active 

e Processes that are databases 

e Processes that are libraries 


These categories correspond to the system commands §, W, A, DBS, and LIBS 
respectively. 


For each process reported, the returned summary information includes the mix number 
of the process, the stack number of the process, whether or not the process has a 


displayed message, and, if the process is a compiler, whether or not the compiler has 
detected a syntax error. 


Input 


For SUBTYPE 5, use MASK bits to indicate the lists of processes that GETSTATUS is 
to construct. These lists are shown in Table 2-3. . 


Table 2-3. Process Lists for SUBTYPE 5 Calls 


MASK Bit Process State . 


_ MASK bit 0 is not used. 


Active entries. 


Waiting entries (suspended processes). 


Scheduled entries. 
DBS entries. 
Library entries. 


If you turn on more than one of these MASK bits, GETSTATUS constructs lists for 
more than one set of processes. You should store in ARY[0] the index of the last word in 
the array ARY into which GETSTATUS can store results. 
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2-20 


You can control the selection of processes reported as follows: 


e Ifthe sign bit (bit [46:01]) of the SUBCLASS parameter is turned off, GETSTATUS 
does not report independent runners. 


e IfTYPE.GSORGUSERF (bit [47:01] of the TYPE parameter) is turned on, 
GETSTATUS reports processes only if their USERCODEs are equal to the string 
supplied in the last three words of the array parameter. 


e IfTYPE.GSORGUNITF (bit [31:16] of the TYPE parameter) is not 0, GETSTATUS 
reports only processes with that ORGUNIT. 


e If MASK bit [47.01] is turned on, GETSTATUS reports only processes that were 
started by an MCS whose MCSNUMBER is equal to the value supplied in ARY 
[SIZE (ARY) -5]. 


e If MASK bit [46:01] is turned on, GETSTATUS reports only processes that were 
started from the job queue whose queue number equals the value supplied in ARY 
[SIZE (ARY) —4]. 


You must provide enough words for all the processes to be reported, for extra words 
corresponding to MASK bits that are on, and for intervening MASK bits that are off or 
are not used. 


Note: You can safely calculate the number of necessary words by using the 
following formula: 


ARY [@] := FIRSTONE (MASK) 
+ (maximum number of processes expected); 


The maximum number of processes expected should be estimated with respect to any 
selection requested (such as usercode), but without regard to the MASK bits that are 
turned on. 


Results Returned 


. GETSTATUS stores one word in the array ARY for each process reported. The words 


for processes with states corresponding to MASK bits that are turned on are linked 
together. The index of the first word in the list of active processes begins in ARY[1], 
the index of the first word in the list of suspended processes begins in ARY[2], and so 
forth. That is, the list for each MASK bit turned on begins in the word of the array that 
corresponds to the MASK bit number plus 1. If the index value in a head-of-list word is 
1, the list is empty. 


For each process reported, GETSTATUS returns a single word of information formatted 
as follows: 


Field | Value Description 

[47:12] Varies Stack number of the process. . 

[35:01] 1 The process has displayed a message and 
the process is not a database stack (DBS). 

[34:01] 1 The process is a DBS. 

[33:01] 1 The process is a library. 


continued 
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continued 
Field Value Description 


[32:01] 1 The process is a job or a DBS. The 
following structure applies: 


e Field (15:01) has a 1 if the process is 
a WEL job with offspring processes. 


e Field [14:15] contains the 
A MIXNUMBER of the process or O. 
Invisible independent runners do not 
always have a MIXNUMBER. 


0 The following values apply: 


e Field [15:04] contains the level of 
this process as a a descendent from 
its root parent (its parent’s parent's 
parent). 


e = If field [11:12] has a 0, the field 
contains the index of a word in the 
array ARY that contains a descriptor 
for a process of which this process is 
a descendent. The indexed word 
might be for the parent of the process 
or for the parent of the parent of the 
process (and so forth). 


[31:02] This field contains an indicator of the state 
that the process is in. The indicator is 
abbreviated because there are only two 
bits. Thus, the field contains one of the 
following values: 


e 0 =DBSentries 

e 1 = Active or library entries 
e 2 = Suspended entries 

@ 3 = Scheduled entries 


[29:01] 1 The process is a compiler that has 
detected a syntax error. 


[28:01] 1 The process, which is not a DBS, is 
suspended. 
[27:12] ‘If not 0, this field is the index of the word 


that describes the net process in the same 
list (suspended, DBS, and so forth). 
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SUBTYPE 6 Calls (Kind of Job) 


For SUBTYPE 6, GETSTATUS reports the kind of job for a list of mix numbers. 


Input 


The caller should fill in ARY as follows: 


ARY Description 
0 This word should contain the count of mix numbers provided. 
lton Each word should contain in binary the mix number of the process to 
report. 
Results Returned 


GETSTATUS replaces each mix number word with either a soft error word if the mix 
number is not in the range of 1 to 9999 or one of the code values in Table 2-4. 


Table 2-4. Code Values for SUBTYPE 6 Calls 


Code Value Meaning 


The process is a session. 


The process has been initiated, and it is not a session. 


The process is a WFL job that is in the job queue but has not been 
initiated. 


There is no process with this mix number. 


SUBTYPE 9 Calls (ACCUMPROCTIME and USERCODE for 
Stack Numbers) 


For SUBTYPE 9 requests, GETSTATUS returns ACCUMPROCTIME and USERCODE 
for a list of stack numbers. 


Input 
The caller should set up the array ARY as follows: 


ARY Description 


0 This word should contain the index plus 1 of the last word in the array 
that contains a stack number. 


1 through n Each word should contain a stack number. 
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Results Returned 


GETSTATUS returns six words per stack number, starting at the word indexed by the 
value that the caller placed in ARY[0]. Before returning, GETSTATUS replaces ARY[0] 
by the index plus 1 of the last stack number word processed. If the array is not large 
enough, that is, if it does not contain at least (7 * ARY [0] + 1) words, GETSTATUS 
turns on bit [47:01] of ARY[0]. 


For each stack number word, GETSTATUS either replaces the word with a soft error 
word (with bit [47:01] turned on) or stores six words in the array that describes the 
status of the process running on the given stack. GETSTATUS places the six words for 
a requested stack number at the word given by the following method. 


Suppose that N is the original value that the caller placed in ARY[0]. Then the six words 
of information for the stack number in ARY[1] begin at word N, the six words for the 
stack number in ARY[2] start at word N + 6, the six words for the stack number in 
ARY[3] start at word N + 2 * 6, and so forth. 


GETSTATUS uses the above method even if some of the requested stack numbers yield 
soft error words, in which case GETSTATUS leaves the corresponding six words unused. 
The six words of information for each stack reported are as follows: 

Word Description 


0 Contains the validity mask. Bit [0:01] is turned on if the process is not 
scheduled and its ACCUMPROCTIME has been retrieved. Bit [1:01] is 
turned on if the process has a USERCODE. 


1 Represents the ACCUMPROCTIME for processes in 2.4-microsecond 
intervals of time. 
2 through 5 Represent the USERCODE of the process in standard form. 
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GETSTATUS Request Type 2 
(Miscellaneous Requests) 


GETSTATUS miscellaneous requests are grouped under Request Type 2. These 
GETSTATUS calls retrieve information about the status of the system. For example, 
the controller uses these calls to generate displays for the system commands WM (What 
MCP), SL (Support Library), and OP (Options). For more information about these 
commands, refer to the System Commands Reference Manual. 


To use miscellaneous calls, the calling process must have privileged status or must have 
been started from an ODT witha WFL JOB or RUN statement, but not with a primitive 
??RUN system command. Otherwise, a security error occurs and GETSTATUS returns 
hard error 43 (refer to Appendix A). 

The general form of the GETSTATUS call is as follows: 


B := GETSTATUS (TYPE, SUBCLASS, MASK, ARY); 


Parameters 


TYPE 


The following are Request Type 2 parameters. 


This parameter generally selects the specific case and subcase within the GETSTATUS 


intrinsic. For miscellaneous requests, the fields within the word are as follows: 


e TYPE.TYPEF [7:08] = 2 

e TYPE.SUBTYPEF [15:08] 

Field [15:08] contains the SUBTYPE for Request Type 2. 

The following information lists the various SUBTYPES. Not all numerical miscellaneous 


SUBTYPEs are assigned. Numbers not listed are invalid. In the following information, 
HYPERchanne!® refers to the HYPERchannel adapter. 


SUBTYPE Description 
0 Reserved. 
1 Retrieves information about operations. 


continued 


HYPERchannel is a registered trademark of Network Systems Corporation. 
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continued 
SUBTYPE Description 
2 Retrieves information about the hardware environment. 
3 Retrieves information about system usage of statistics; refer to the 
system command U (Utilization) in the System Commands 
Reference Manual. 
4 _ Retrieves information about system balancing parameters. 
5 Reserved. 
6 Reserved. 
7 Reserved for internal use. . 
8 Retrieves reliability statistics for data link processors (DLPs), controllers, 
/O processors (IOPs), or ports. 
11 Retrieves information about library functions; refer to the SL (Support 
Library) system command description in the System Commands 
Reference Manual. 
12 Retrieves information about operations as selected by MASK bits. 
13 Retrieves information about the ASD factor; refer to the system 
command SF (Set Factor) in the System Commands Reference 
Manual. 
14 Retrieves information about security administration. 
18 Retrieves PS status information. 
19 Retrieves memory dump type (MDT) information. 
50 Reserved. 
51 Retrieves HLUNIT information. 
53 Retrieves.change MCP information; refer to the system command CM 
(Change MCP) in the System Commands Reference Manual. 
54 Retrieves BOOTCODE file information; refer to the system command MB 
(Make Boot) in the System Commands Reference Manual. 
56 Retrieves information about autopower. 
63 Retrieves information about the resident programs; refer to the system 
command RP (Resident Program) in the System Commands 
Reference Manual. 
69 Retrieves information about data communications. 
70 Retrieves information about HYPERchannel statistics. 
71 Retrieves information about support libraries; refer to the system 
command SL (Support Library) in the System Commands Reference 
Manual. 2 
72 Retrieves information about disk cache. 
76 Retrieves information about selective logging; refer to the system 
command LOGGING (Logging Options) in the System Commands 
Reference Manual. 
continued 
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continued 
SUBTYPE Description 

78 Retrieves information about suppress warnings; refer to the system 
command SUPPRESSWARNING in the System Commands 
Reference Manual. 

79 Retrieves information about MCS programs. 

80 Retrieves information about a time zone. 

81 Retrieves information about PrintS (print subsystem). 

85 Retrieves information about attributes for dependent task accounting and 
file accounting; refer to the system command SYSTEMACCOUNTING 
(Resource Accounting) in the System Commands Reference 
Manual. 

SUBCLASS 


MASK 


When SUBCLASS is required, its usage depends on the particular SUBTYPE. 
Therefore, SUBCLASS is explained later in the description of the SUBTYPE requests 
that use SUBCLASS. | 


For SUBTYPEs 1, 2, and 12, the MASK parameter is used to select the process _ 
attributes and status information to be retrieved by GETSTATUS. Each bit that is 
turned on in the MASK parameter instructs GETSTATUS to report the corresponding 
status item. Refer to Table 3-1, Table 3—2, and Table 3-3 for listings of valid MASK bits 
and their uses. 


The use of some of the MASK parameter bits by SUBTYPEs 1, 2, and 12 is special 
and differs from the normal use of these bits for other Request Types (mix, unit, and 
directory). For miscellaneous request types, combinations of MASK bits should not be 
arbitrarily used. There are two reasons: 


e Some MASK bits, such as MASK bit 38 for a SUBTYPE 1 call (MCS name or 
number), require special parameter information in the array ARY that might be 
overwritten by GETSTATUS if other MASK bits are turned on. 


e At different installations, the use of some MASK bits might cause GETSTATUS to 
return a soft error word. When a soft error word is returned, it takes the place of 
the miscellaneous info pointer word so that none of the information requested by 
other MASK bits is available. 


As a practical matter, if information for several MASK bits is wanted, the easiest thing to 
do is to issue individual GETSTATUS calls for each individual MASK bit. 
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Array ARY Parameter 
For some SUBTYPEs, you must place parameter data such as names in the array 
ARY to indicate to GETSTATUS the information that is to be retrieved. In turn, 
GETSTATUS stores the retrieved information into the array ARY. The exact format of 


the array parameter and result information is described later under the description of 
each particular SUBTYPE. 


Request Type 2 Calls by SUBTYPE 


The following Request Type 2 (miscellaneous) calls are grouped by SUBTYPE because 
they are functionally related and share common characteristics. __ 
SUBTYPE 1, 2, and 12 Calls (Operations and Hardware Information) 


For SUBTYPE 1 and 12 calls, GETSTATUS returns information about operations. For 
SUBTYPE 2 calls, GETSTATUS returns information about the hardware environment. 


Some of the information returned for subtype 1 calls corresponds to information 
displayed by the CF, CM, CS, DC, DL, HN, ID, OP SE SI, and WM system commands. 


Some of the information returned for subtype 2 calls corresponds to information 
displayed by the CU, SC, PC, and GC system commands. 


Some of the information returned for subtype 12 calls corresponds to information 


displayed by the WM, SYSTEMLANGUAGE, SECOPT, DRC, COMPILERTARGET, 
SEGARRAYSTART, and NETEX system commands. 


Input for SUBTYPE 1, 2, and 12 Calls 


Input information should be structured as follows: 


Parameter Value or Description 

TYPE Value = 2. 

SUBTYPE Value = 1, 2, or 12. 

SUBCLASS Value = 0. 

MASK Bits in the MASK parameter select the information that is to be 


returned. If you turn on more than one bit, you can retrieve 
information corresponding to all those bits with one call. For specific 
information about the information that can be returned by MASK 
bits, refer to Tables 3-1, 3-2, and 3-3. 


ARY ARY [0] = 2. 
ARY [1] = 0. — 


The value for BASE is returned in ARY [1].[32:17]. BASE is defined 
in “Results Returned for SUBTYPE 1, 2, and 12 Calls.” 
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Results Returned for SUBTYPE 1, 2, and 12 Calls 


Figure 3-1 shows a diagram of the information returned in the array ARY for SUBTYPE 
1, 2, and 12 calls. (In Figure 3-1, BASE is 2.) 


BASE BASE +1 BASE +2 BASE +N 


[TTA 


Validity J [ Variable- 


Mask Length 
Linked 
Information 
Information for 
MASK Bit @ 
Information for 
Information for MASK Bit N-1 
MASK Bit 1 


Figure 3—1. Format of Information Returned for SUBTYPE 1, 2, and 12 Calls 


The validity mask has a bit turned on that corresponds to bits in the MASK parameter. 
These MASK bits are turned on for information that was successfully retrieved. 


Each word after the validity mask (for which the corresponding validity mask bit is 
turned on) is either the status information retrieved or is a link to the status information 
retrieved. 


The variable-length linked information follows the last word referenced by the validity 
mask. GETSTATUS places information in this area for items described with the phrase 
link to in the MASK tables (Tables 3-1, 3-2, and 3-3). Given the value of the link word, 
the caller can locate the linked information with an index calculated with one of the 
following formulas in which BASE equals 2: 


INDEX := ARY [BASE + (MASK bit number + 1)].XSLINKF + BASE; 
INDEX := (Tink word) .XSLINKF + BASE; 
XSLINKF = [32:17], and INDEX is the word index that locates the beginning of the 


information. For example, the link word for display messages (MASK bit 13) is contained 
in ARY [BASE + 14]. 
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In Tables 3-2, 3-8, and 3-4, the link format for miscellaneous requests is as follows: 


e GSINFOF [15:16] 
- This word is the length in bytes of the item linked. 
e XSLINKF [32:17] 


This word is the offset to the beginning information in the array ARY. When this 
offset is added to the BASE value of 2, the sum is the index of the information in the 
array. 


Some of these links point to a name that is in standard form. 


Besides regular links, some miscellaneous MASK bits return word links. A word link 
has the same field layout as a link, but the GSINFO field contains the length in words 
instead of bytes. | 


Table 3-1. Status Information Reported for SUBTYPE 1 Calls 


MASK Bit Description 


OP options bit mask. 


Contains the value 1 if the system command HS (Hold Schedule) is in 
force. Otherwise, the field contains 0. 


Bits [19:20] contain the first valid stack number on the system. Bits 
[39:20] contain the last valid stack number on the system. 


Contains the count of the number of processes in the system; frozen 
libraries are excluded. 


The time base in 2.4-microsecond intervals of time. When this value is 
added to the time of day, the value gives the time since the system 
halt/load. 


The current time of day in 2.4-microsecond intervals of time. 
MASK bit 6 is reserved. 

Working set factors: 

e Bits [15:16] contain FACTOR. 

e Bits [31:16] contain OLAYGOAL. 

e Bits [47:16] contain AVAILMIN. 


For more information, refer to the system command SF (Set Factor) in 
the System Commands Reference Manual. 


Link to supervisor name in standard form. Refer to the system command 
CS (Change Supervisor) in the System Commands Reference 
Manual. 


If a CM system command is pending, a link to the name of the next 
MCP in standard form. 


continued 
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Table 3-1. Status Information Reported for SUBTYPE 1 Calls (cont.) 


MASK Bit Description 


Link to the intrinsics name in standard form. 


Link to the disk location information. The disk location information is 
controlled by the SUBCLASS parameter as follows: 


@ 0 = OVERLAY 

@ = LOG 

e 2 = BACKUP 

e 3 = USERDATA 
4 = JOBS 
5 = CATALOG 
6 = DPFILES 

e@ 7=SORT 

e 8=IPFILES 


The first word is the number of family name entries. Each entry consists 
of four words formatted as follows: Bit [47:01] of the first word is turned 
on if no family name has been designated. The next three words contain 
designated family names in substandard form. For SUBCLASS 0 
(overlay) more than one 4-word entry can be returned; for all the other 
SUBCLASS values, only one entry is returned. 


Halt/load backup unit numbers (for duplicated or triplicated MCPs). 
Date. 
Time of day in 2.4-microsecond intervals of time. 


Link to the data communications processor (DCP) prefix in standard 
form. 


Link to the MCP names in standard form. Bits [46:08] of the link word 
contain the box mask for which the MCP names are being reported. 
When more than one bit is on in this field, more than one name is 
returned. 


Link to the MCP compiler control ($) options that were set when the 
MCP was compiled. 


Automatic backup information. 


MCP level. 


Link to the next DCP prefix in standard form (to be used after the next 
halt/load). 


Link to the halt/load reason; two words in Burroughs Common Language 
(BCL) characters. . 


continued 
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Table 3-1. Status Information Reported for SUBTYPE 1 Calls (cont.) 


MASK Bit Description . 


Halt/load unit number. 
MASK bit 23 is reserved. 
Link to substitute backup information. 


Catalog level. 

System serial number in binary. 

Link to the hub map. 

Mask of types of controlware saved or —1. 
Link to failure analysis summary. 


Memory priority; refer to the system command SF (Set Factor) in the 
System Commands Reference Manual. 


Plus (+) or minus (~) the BUFFERGOAL. If the value is negative, then 
the system is using the default BUFFERGOAL. 


State bits. Bits [47:02] are a code value of the system AUTORESTORE 
archiving option: 


@ 0 = DONTCARE 

e 1=NEVER 

e 2=YES 

Link to dump name and HLDUMPDISK information. 
MASK bit 34 is reserved. 

MASK bit 35 is reserved. 

MCP level: 

e@ [47:08] contains the Mark digit in binary. 

e [39:08] contains the level in binary. 

e [31:16] contains the cycle number in binary. 
e@ [15:16] contains the patch number in binary. 


Returns the MCS name or MCS number. MASK bit 37 is special and 
cannot be used in conjunction with other MASK bits. Refer to 
“SUBTYPE 1 MASK Bit 37 (MCSNAME and MCSNUMBER Conversion)” 
immediately following this table for details on how to use this MASK bit. 


Link to the configuration file name in standard form. 


Link to the HOSTNAME in standard form. 


continued 
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Table 3-1. Status Information Reported for SUBTYPE 1 Calls (cont.) 


MASK Bit Description 


Running status of BNA. The value is 1 if BNA is running and 2 if BNA is 
not running. 


Link to the GROUP ID name in standard form. 
Link to the host usercode in standard form. 
Reserved. 


Link to two MCP code file status words. The first word contains the MCP 
compile time and date. The second word contains the McP compiler 
information. 


Link to the next group HOSTNAME in standard form. 
MASK bit 46 is reserved. 
MASK bit 47 is reserved. 


SUBTYPE 1 MASK Bit 37 (MCSNAME and MCSNUMBER Conversion) 


A special method is used to convert MCSNAME to MCSNUMBER values and 
MCSNUMBER to MCSNAME values. 


Input for MCSNAME-to-MCSNUMBER Conversion 


Use the following input for array ARY to convert MCSNAME to MCSNUMBER values: 


ARY Value or Description 

ARY [0] 2 

ARY [1] 0 

ARY [3] <mcsname> in standard form 
Call 


B := GETSTATUS (2 & 1 [15:18] & 1 [46:91], 0, @ & 1 [37:01], ARY); 


Results Returned for MCSNAME-to-MCSNUMBER Conversion 
GETSTATUS returns the MCSNUMBER value in array ARY [2 + 37 + 1]. 


GETSTATUS returns errors in the normal manner if no MCS exists with that name or if 
data comm is not active. 
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Input for MCSNUMBER-to-MCSNAME Conversion 


Use the following input for array ARY to convert MCSNUMBER to MCSNAME values: 


ARY Value or Description 

ARY [0] 2 

ARY [1] 0 

ARY [3] <mcsnumber> 
Call 


B := GETSTATUS (2 & 1 [15:18] & @ [46:01], @, @ & 1 [37:1], ARY); 


Results Returned for MCSNUMBER-to-MCSNAME Conversion 
The MCSNAMKE is returned in standard form in the following array: 
ARY [2 + ARY [2 + 37 + 1].[32:17]] 


Errors are returned in the normal method if no MCSNAME exists with that number or 
if data comm is not active. 


Table 3-2. Status Information Reported for SUBTYPE 2 Calls 


MASK Bit Description . 


Microcode version or 0. 

Bit mask of processors. 

Bit mask of I/O processors. 

Maximum valid MCP unit table index. 

MASK bit 4 is reserved. 

Word link to memory and buffer status information. 
Reserved. | | 
Overlay size. 

Word link to memory status information. 

MASK bit 9 is reserved. 


Nonstandard link to cache status; refer to the system command GC 
(Group Configuration) in the System Commands Reference 
Manual. 


Memory address of the DO register. ‘ 


0 
1 
2 
3 
4 
5 
6 
7 
8 
9 


py 
© 


MASK of memory modules or 0. 


continued 
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Table 3-2. Status Information Reported for SUBTYPE 2 Calls (cont.) 


MASK Bit Description 


Link to /O channel status information. 

MASK bit 14 is reserved. 

Link to CPM microcode versions. 

MASK bit 16 is reserved. 

Link to module status. 

MASK bit 18 is reserved. 

MASK bit 19 is reserved. 

Link to group unit information. 

MASK bit 21 is reserved. 

MASK bit 22 is reserved. 

Word link to the configuration table. 

MASK bit 24 is reserved. 

MASK bit 25 is reserved. 

Link to the configuration table. 

Link to 900 words of formatted configuration information. 
Link to MSM information or to page information. 
MASK bit 29 is reserved. 

MASK bit 30 is reserved. 

MASK bit 31 is reserved. 


Word link to memory module information. Refer to “SUBTYPE 2 MASK 
Bit 32 (Memory Module Information)” immediately following this table. 


Link to list of temporary units. 


Link to information about the HYPERchannel map being used in the 
current configuration. You can use this information to determine the 
names that are associated with the HYPERchannel units: 


e The first word contains the number of adapter specifications. 


e The information for the adapters starts in the second word. Each 
adapter specification is 64 words long. Refer to the HYPERchannel 
map for details. 


For task control processor (TCP) systems, the bit mask of TCPs. 


Link to two words of TCP microcode-level information. 


Link to three words of memory page assignment status. 
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SUBTYPE 2 MASK Bit 32 (Memory Module Information) 


Figure 3-2 shows the structure of the information returned by this call. 


Figure 3-2. Structure of Information Returned for SUBTYPE 2 MASK Bit 32 


LWMA is the link word to the memory module bit vector MA, LWPMaA is the link word 
to the memory module bit vector PMA, and LWSMaA is the link word to the memory 


module bit vector SMA. 
Figure 3-3 shows the structure of the memory module bit vectors MA, PMA, and SMA 
returned to the caller. 
word @ word 1 word n 
Bit 47 46 45 ---O 47 46 


47 48 49.. X-2 X-1 X 


Figure 3-3. Structure of Memory Module Bit Vectors MA, PMA, and SMA 


If a bit in an MA bit vector is turned on, the corresponding memory module is in-use by 
the MCP If a bit in a PMA bit vector is turned on, the corresponding memory module 

is present (that is, it was found by the last halt/load). If a bit in an SMA bit vector is 
turned on, the corresponding memory module i is has been saved by the SV (Save) system 
command. 


The fictnad used to return information in array A is as follows: 


Word Field Name and Meaning 
¢) MOD SIZE WORD 
19:20 Contains the memory module size in units of K 
words. 
1 LWMA 
19:20 Contains the index to the bit vector MA (shown 
below as word number 4). 
39:20 Contains the length of the bit vector MA in words. 


continued 
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continued 


Word Field Name and Meaning 


2 


LWPMA 


19:20 Contains the index to the bit vector PMA (shown 
below as X). 


39:20 Contains the length of the bit vector PMA in words. 
| LWSMA 


19:20 Contains the index to the bit vector SMA (shown 
below as Y). 


39:20 Contains the length of the bit vector SMA in words. 
This word is the starting word of the bit vector MA. 


This word is the starting word of the bit vector 
PMA. 


This word is the starting word of the bit vector 
SMA. 


SUBTYPE 2 MASK Bit 34 (HYPERchanne! Map) 


Each adapter specification consists of 64 words. It is divided into 4-word logical pieces of 
two types, each of which is defined below. Indexes into the ARY for each of these types 
for any of the adapter specifications are determined by using the following algorithms: 


ASPEC = BASE+ LINK+ 1+ (n*64) 


ASPEC is the starting index of relative information of the nth adapter specification, 
where BASE is 2 and where LINK is the value extracted from the XSLINKF [32:17] 
field of the result word returned in ARY [BASE + 34 + 1]. 


USPEC= ASPEC+ 4+ (4*m) 


USPEC is the starting index of mth logical unit specification within the nth adapter 
specification, where m is a number in the range 0 to the last logical unit designated 
for the adapter. 


The first four words of an adapter specification contain adapter relative information. 
They are formatted as follows: 


ARY [ASPEC] through ARY [ASPEC + 2] of the adapter name in substandard form. 
ARY [ASPEC + 3].[7:8] | 

The trunk address of the adapter. 

ARY [ASPEC].[47:1] 

If turned on, a valid entry. 

ARY [ASPEC].(15:8] 

The number of logical unit specifications for the adapter. 
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The remaining 60 words of an adapter specification are divided into 4-word entries, 
each called a logical unit specification. For the A222 adapter, there can be only one unit 
specification, which corresponds to the one unit that is available on the system. Each 
logical unit specification is formatted as follows: 
e ARY [USPEC] through ARY [USPEC + 2] of the unit name in substandard form. 
e ARY (USPEC + 3].[47:1] 

If turned on, a unit specification exists for the adapter. 
e ARY [USPEC].[46:1] 

If turned on, trunk information exits. 
e ARY [USPEC].[45:1] 

If turned on, write partner information exists. 
e ARY [USPEC].[44:1] 

--‘Ifturned on, read partner information exists. 
-@ ARY (USPEC].[43:8] 


Logical unit number. For an A222 adapter, this number can be in the range 0 to 63, 
inclusive. 


e ARY [USPEC].[35:4] 

Trunk mask. 
e ARY (USPEC].[31:8] 

Trunk address of the read partner. 
e ARY [USPEC].[23:8] 

Logical address of the read partner. 
e ARY [USPEC].[15:8] 

Trunk address of the write partner. 
e ARY [USPEC].[ 7:8] 

Logical address of the write partner. 
In Table 3-3, NETEX® refers to software that enables different computers or 


workstations with different operating systems to communicate over a HYPERchannel 
network. | 


4 


NETEX is a registered trademark of Network Systems Corporation. 
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Table 3-3. Status Information Reported for SUBTYPE 12 Calls 


MASK Bit Description 


Link to the halt/load and backup halt/load unit number list for the 
processor on which the caller is running. The first word of information 
contains a count in [47:8] and a bit mask. The remaining words contain 
unit numbers of the halt/load and backup halt/load units (disk units with 
duplicated or triplicated copies of the MCP). 


Unit number of the halt/load unit. 


Link to the backup halt/load unit number list—in the same form as for 
MASK bit 0, except the active halt/load unit number is not returned. 


Default compiler target. 


MASK bit 4 is reserved. 
Link to SEGARRAYSTART information. 
Reserved. 


Returns the SYSTEMLANGUAGE value. MASK bit 7 is special and 
cannot be used in conjunction with other MASK bits. Refer to “SUBTYPE 
12 MASK Bit 7 Calls (System Language)” immediately following this 
table for details on how to retrieve the SYSTEMLANGUAGE value. 


This call is being deimplemented on a future release. The preferred 
method is to use Mask bit 17. 


Link to the next HOSTGROUP name that is to take effect after the next 
halt/load and the current hostname. The names are in substandard form. 
/ The format is as follows: 


The first word is reserved. The next three words contain the next 
HOSTGROUP name or O. The last three words contain the current 
HOSTGROUP name. 


A link to the current and next BNA version; refer to the system command 
BNAVERSION in the System Commands Reference Manual. in 
the information returned, word 1 contains the next BNA version and 
word 2 contains the current BNA version. Numerical values are 1 for 
BNA Version 1 and 2 for BNA Version 2. 


0 if BNA V2 is in isolated mode. 1 if BNA V2 is in networking mode. 


A nonstandard link to the list of languages that are available in the MCP 
for system messages translated by the MLS. XSLINKF [32:17] contains 
the offset to the start of the list; GSINFOF [15:16] contains the length of 
the list in words. The first word of the list contains a count of the 
number of languages available in the MCP. Starting at the second word of 
the list, there are three words for each language bound into the MCP. 
Each language name appears in substandard form. 


information about the initialization file to be used the next time NETEX 
software is initialized: 


continued 
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Table 3-3. Status Information Reported for SUBTYPE 12 Calls (cont.) 


MASK Bit Description ‘ 


If the XSLINKF field [32:17] is not equal to 0, it is the offset to the title 
of the initialization file in standard form. 


The GSINFOF field [15:16] contains a title indicator code: 
e j1=NULL 
e 2 = DEFAULT 
e 3 = SPECIFIED TITLE 
Security options word: 
e Bit [00:01] = 1 (Security administrator is authorized.) 
e Bit [01:01] = 1 (Program dump filtering is turned on.) 
e Bit [02:01] = 1 (Mandatory disk scrubbing is turned on.) 
Bit [03:01] = Nonuser file security: 
- 0O= PUBLIC 
- 1 = PRIVATE 
Bit [04:01] = 1 (All hosts are restricted.) 
Bit [05:01] = 1 (Backup files have usercodes of owners.) 
Bit [07:01] = Reserved for future use. 
Bits [11:04] = Security class: 
- 0 = Class U (unspecified) 
- 1-=Class SO 
- 2=Class$l 
- 3=Class $2 
Bits [13:02] = Current tape security: 
- 0O=NONE 
- 1 = AUTOMATIC 
Bits [15:02] = Tape security will be the following: 
- 0O=NONE 
— 1 = AUTOMATIC 
Bits [18:03] = Password management: 
—- 0O=MINIMAL 
- 1 = GENERATED 


_continued 
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Table 3-3. Status Information Reported for SUBTYPE 12 Calls (cont.) 


MASK Bit Description 


e Bits [27:09] = Reserved for future use. 


e Bits [30:03] = An integer in the range 0 to 6, inclusive; the CANDE 
LAISSEZFILE option is turned on. 


Bits [31:01] = Reserved for future use. 

Bits [32:01] = 1 (CANDE DIALLOGIN option is turned on.) 
Bits [33:01] = 1 (CANDE ALLLOGIN option is turned on.) 

Bits [34:01] = 1 (CANDE SECDIALIN option is turned on.) 

Bits [35:01] = 1 (CANDE SECPSEUDO option is turned on.) 
Bits [36:01] = 1 (CANDE SECALL option is turned on.) 

Bits [37:01] = 1 (CANDE USECOMSPRIV option is turned on.) 
Bits [46:09] = Reserved for future use. 

Bits [47:01] = 1 (infoGuard is authorized). 


If security administrator status is authorized on the system, the call 
can be invoked by a security administrator usercode or any 
privileged user. If security administrator status is not authorized on 
the system, the call can be invoked by any privileged user. 


For more information about security, refer to the SECOPT (Security 
Options) system command in the Systern Commands Reference 
Manual. 


Disk resource control (DRC) subsystem information. Bit [7:08] contains 
the DRC subsystem state: 


e 0 = Inactive 

e 1 = DRC system will be started after the next halt/load 
e 2 = Initializing 

e 3 = Active 

e 4= Terminating 

Reserved. 

Reserved 


Returns a link word that points to the system language. The format of 
the data is 1 byte for length followed by the language. 


Returns the system CCSVERSION file attribute. 


Returns a link word that points to the system convention. The format of 
the data is 1 byte for length followed by the convention name, such as 
ASERIESNATIVE. 
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SUBTYPE 12 MASK Bit 7 Calls (System Language) 


Note: This call will be deimplemented in a future release. Programs 
that use this call in the Mark 3.9 software release will receive a 
warning message. It is better to use MASK bit 17 to return the system 
language. = 


Input 


A special method is used to return the SYSTEMLANGUAGE. Use the following input 
for array ARY: 


ARY Value or Description 
ARY [0] 5 
ARY [1] 0 

Call 


B := GETSTATUS (2 & 12 [15:08], 8, @ & 1 [7:01], ARY); 


Results Returned 


The SYSTEMLANGUAGE is returned in substandard form, starting at the pointer 
given by POINTER (ARY [1]) + 5. 


See the examples of subtype 1, 2, and 12 GETSTATUS calls at the end of this section. 


SUBTYPE 11 Calls (System Library) 


3-18 


For subtype 11 calls, GETSTATUS returns the title of a support library. GETSTATUS 
is passed the name of the function library in substandard form and returns title in 
standard form if the current support library is a code file that is not the active MCP. See 
also SUBTYPE 71. 


Input 


Use the following input information for array ARY: 


ARY Value or Description 

ARY [0] 2 

ARY [2] through ARY [5] Library function name in substandard form 
Call 


B := GETSTATUS (2 & 11 [15:08], 2, 8, ARY); 
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Results Returned 


If there are no errors, word 1 of the array contains a word index to the standard form 
title as defined by the SL (Support Library) system command. 


SUBTYPE 13 Calls (ASD Tables) 
For SUBTYPE 13 calls, GETSTATUS returns information about the ASD table. 


Input 


Use the following input information for array ARY: 


ARY Value or Description 
ARY [0] 2 
ARY [1] 20 

Call 


B := GETSTATUS (2 & 13 [15:08], ®, 8, ARY); 


Results Returned 


Information is returned in the following format: 


ARY Word Contents 

0 2 

1 | 0 or soft error code. 

2 The factor used for calculating the length of the ASD table at the last 
halt/load. . 

3 The factor used for caiculating the length of the ASD table at the next 
halt/load. — 

4 Field [19:20] contains the total number of ASDs. 

5 The percentage of ASDs currently in use. 

6 The percentage of ASDs used at one time since the last halt/load. 

7 Current memory size. 

8 Next memory size. 


SUBTYPE 14 Calls (Security Administrator Status) 


For SUBTYPE 14 calls, GETSTATUS returns information about security administrator 
status such as the designated session, job, or task. This status is determined by the 
usercode associated with the job, task, or session. A usercode has security administrator 
status if the SECADMIN option is designated for the usercode in the USERDATA file. 
There is no corresponding system command for this GETSTATUS call. 
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‘Input 


Use the following input information for array ARY: 


ARY Value or Description 

ARY [0] 2 

ARY [1] 1 

ARY [2] Session number or mix number of the job or task 
Call 


B := GETSTATUS (2 & 14 [15:08], 8, @, ARY); 


Results Returned 
The status of the specified session, job, or task is returned in word 1 of the array ARY: 


e If word 1 equals 0, the session, job, or task does not have security administrator 
status. 


e If word 1 equals 1, the session, job, or task does have security administrator status. 


SUBTYPE 15 Calls (Network Status) 
For SUBTYPE 15 calls, GETSTATUS returns information about the status of the . 
network as a state, initialization information, and the network name. The corresponding 


system commands for this GETSTATUS call are the NET (BNAv1) command, the BNA 
(BNAv2) command, and the X25 (X25MCS) command. 


Input 


Use the following input information for ARY: 


ARY Value or Description 

ARY [0] 2 

ARY [1] 0 

ARY [3] Indicates which network is to be queried: 
lf ARY [3].[47:01] = 0, then ARY [3] = the network index of 
the MCP: 


1 = BNAv1, 2 = BNAv2, 3 = X25 


if ARY [3].[47:01] = 1, then ARY [3].[03:04] = the offset in 
words to the network name (in substandard form). ARY 
[ARY[3].[03:04]] contains the network name. 


Call 


B := GETSTATUS (2 & 15 [15:88], 8, @, ARY); 
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Results Returned 


GETSTATUS returns information in the following format: 


ARY Word Contents 

ARY [4] through Network name in substandard form 
ARY [6] 

ARY [7].[47:08] Reserved for future use 

ARY [7].[39:04] Network state: 


e OQ= NOT RUNNING 
e 1 = INITIALIZING 
@ 2 = FROZEN 
e 3 =TERMINATING 
ARY [7].[35:04] Network unit information: 
e 1=*NULL 
e 2 = *DEFAULT 
e 3= <file title> found in ARY[{11] in display form 


ARY[7].[31:16] Reserved for future use 
ARY([7].[15:08} Controller port index of the network 
ARY[8] through The primary library function name 
ARY[10] 
ARY{11] through The next NETINIT file title in display form 
ARY[53] 

Examples 


To inquire on a network by its network index: 


ARY[@] := 2: 

ARY[1] := Q; 

ARY[3] := NETINDEX; % 1 = BNAv1, 2 = BNAv2, 3 = X25 
GETSTATUS (2 & 15 [15:88], 8, @, ARY); 


To inquire on BNAv2 with network name: 
ARY[@] : 
ARY[1] : 
ARY[3] := 8 & 1[47:91] & 4[03:04]; 


REPLACE POINTER (ARY[4]) BY 48"95", 8"BNAV2."; 
GETSTATUS (2 & 15 [15:88], 8, @, ARY); 


SUBTYPE 18 Calls (Print Information) 


For SUBTYPE 18 calls, GETSTATUS returns information about printing, such as 


the number of requests that are printing, waiting, waiting for forms, and so on. This 


GETSTATUS call corresponds to the system command PS STATUS. 
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Input 


Use the following input information for array ARY: 


. ARY Value or Description 
ARY [0] 2 
Call 


B := GETSTATUS (2 & 18 [15:98], 8, @, ARY); 


Results Returned 


The array returned by GETSTATUS contains the following information: 


Word Description 

Word 3 Number of requests printing 

Word 4 Number of requests waiting 

Word 5 Number of requests waiting for forms 
Word 6 Number of requests in an exception state 
Word 7 Number of requests that are stopped 


SUBTYPE 19 Call (Memory Dump Type) 


For SUBTYPE 19 calls, GETSTATUS returns the memory dump type setting (refer to 
the MDT system command). 


Input 


Use the following input information for array ARY: 


ARY Value or Description 
ARY [0] 2 
Call 


B := GETSTATUS (2 & 19 [15:88], @, @, ARY); 


Results Returned 


The array returned by GETSTATUS contains the following information: 
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ARY Word Value or Description 
2 Code value: 
e 0 -= COMPLETE 
e 1 = ALLINUSE 
° = PARTIAL 


SUBTYPE 51 Calls (Halt/Load Unit) 


The SUBTYPE 51 call corresponds to the system command HLUNIT. 


Input 


Use the following input information for array ARY: 


ARY Value or Description 
ARY [0] 2 
Call 


B := GETSTATUS (2 & 51 [15:08], 8, @, ARY); 


Results Returned 


GETSTATUS returns information in the following format: 


ARY Word Contents 

ARY [0] Number of entries * 2 

ARY [1] through Each entry is a pair of words, as follows: 
ARY [ARY[0O}-1] 


e = =ARY [Al] = Unit number 
e ARY [AI + 1] = PROCMASK (A 15 systems only) 


For A 10 dual processor systems, the results stored in ARY are as follows: 


ARY Word Contents 

ARYLO] Number of entries * 2 + 16. 

ARY [1] through Each entry is a pair of words, as follows: 
ARY {Number of 


e = First word = Unit number. 
e Second word [15:16] = PROCMASK. 


e  ARY [ARY[O} — 16] for 16 = The last 16 words contain 
halt/load information that is used after reconfiguration, indexed 
by the processor number offset by A [0] — 16 (for example, A[0] 
— 16 + 10 equals halt/load unit information for processor 10 
after reconfiguration). The format for each word is as follows: 


— [47:32] = Undefined 
- [15:16] = Unit number 


entries * 2 — 1] 
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SUBTYPE 54 Calls (BOOTCODE File) 


For SUBTYPE 54 calls, GETSTATUS returns information about the selection of a 
BOOTCODE file during system initialization. This call has two SUBCLASS types. 


SUBCLASS 0 Calls (MB) 


3-24 


Use this type of SUBCLASS call for the equivalent of the system command MB (Make 
Boot). For additional information, refer to the System Commands Reference Manual. 


Input 


Use the following input information for array ARY: 


ARY 
ARY [0] 


Call 


Value or Description 


2 


B := GETSTATUS (2 & 54 [15:08], 2, 9, ARY); 


Results Returned 


GETSTATUS returns information in the following format: 


ARY Word 
ARY [1].[23:12] 
ARY [1).[11:12] 


ARY [2] through ARY 
(ARY [1].[11:12]+1] 


ARY [ARY 


{1].[11:12]+2] to the 


“end 


Contents 


Last valid word in the array row. 


Number of entries. 


Each entry is as follows: 


[47:08] = Family index. 

[38:07] = Priority number. 

[31:04] = Processor ID. 

[27:12] = Pointer to the standard form file title. 
[15:12] = Pointer to the family name. 

[02:01] = Family index information is present. 
[01:01] = A BOOTCODE file is on the unit. 
[00:01] = The file is active. 


File titles and family names in standard form. 


8600 0346-000 


GETSTATUS Request Type 2 (Miscellaneous Requests) 


SUBCLASS 1 Calls (MB ON <family name>) 


Use this type of SUBCLASS call for the equivalent of the system command MB ON 
<family name>. For further information about the MB system command, refer to the 
System Commands Reference Manual. 


Input 


Use the following input information for array ARY: 


ARY 
ARY [0] 
ARY [1] 


ARY [2] through ARY [5] 


Call 


Value or Description 
2 
2 


Family name in substandard form 


B := GETSTATUS (2 & 54 [15:08], 1, 8, ARY); 


- Results Returned 


GETSTATUS returns information in the following format: 


ARY Word 
ARY [1] 
ARY [2] 


ARY [3] 
ARY [4] 
ARY [5] 


ARY [ARY [1]] to the 
end 
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Contents 

Pointer to file title in standard form. 

Entry information, as follows: 

e [47:08] = Family index. 

e [38:07] = Priority number. 

@ [31:04] = Processor ID. 

e [27:12] = Pointer to the file title in standard form. 
@ [15:12] = Pointer to the family name. 

e@ [02:01] = Family index information is present. 
e@ [01:01] = A BOOTCODE file is on the unit. 

e [00:01] = The file is active. 

MB timestamp. 

MCP update timestamp. 

Microcode level information. 


Standard form file titles and family names. 
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SUBTYPE 56 Calls (Automatic Power Schedule) 


For SUBTYPE 56 calls, GETSTATUS returns information about the automatic power 
schedule for A 1, A 2,A8,A4, and A5 machines. This call has two SUBCLASS types. 


SUBCLASS 1 Calls 


3-26 


A SUBCLASS 1 call is a query about the automatic power schedule. 


Input 


Use the following input information for array ARY: 


ARY 
ARY [0] 


Call 


Value or Description 


8 


= GETSTATUS (2 & 56 [15:08], 1, 8, ARY); 


Results Returned 


For SUBCLASS 1 calls, the response in ARY contains a schedule for an entire week in 7 
words. Each word contains information for one day. Word 1 of the array ARY is 0, Word 
2 contains the entry for Sunday, Word 3 contains the entry for Monday, and so on. The 
format of each word is as follows: 


Word 
[47:06] 
[41:01] 
[40:01] 
[39:08] 
[31:08] 
[22:08] 
[15:05] 
[07:08] 
[47:48] 


Description 

Reserved for future use 
On-time valid indicator 
Off-time valid indicator 

Power off delay time in minutes 
On-time hour 

On-time minute 

Off-time hour 


Off-time minute 


_0 if this function is not supported 
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SUBCLASS 2 Calls 


A SUBCLASS 2 call is a mode check request. 


Input 


Use the following input information for array ARY: 


ARY Value or Description 
ARY [0] 8 
Call 


B := GETSTATUS (2 & 56 [15:08], 2, @, ARY); 


Results Returned 


For SUBCLASS 2 calls, the response in Word 1 of the array ARY contains the mode 
check word, as follows: 


Word Description 
[47:08] Reserved for future use 
[39:08] Power-off time remaining. if MODE equals any type of power-off 


pending, this field contains the number of minutes left before power 
is actually shut off. For other modes, this field is 0. 


[07:08] MODE indicator, as follows: 
e [05:01] = Blower failure warning 
e [04:01] = Thermal overload warning 
e [03:01] = Thermal overload power-off pending 
e [02:01] = Power clock master 
e [01:01] = Scheduled power-off pending 
@ [00:01] = Unscheduled power-off pending 


SUBTYPE 63 Calls (Resident Program) 


For SUBTYPE 63 calls, GETSTATUS returns a list of the programs that have been 
subjected to the RP (Resident Program) systemcommand. — 


Input 


Use the following input information for array ARY: 
ARY ; Value or Description 


ARY [0] 2 
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Call 


B := GETSTATUS (2 & 63 [15:08], 8, @, ARY); 


Results Returned 


A{1].[32:17] is the index to the start of data in array ARY. If you index the value of 
A{1].[82:17], GETSTATUS returns the following: 


Word Description 

Word 0 Number of resident programs 

Word 1 Number of words for this entry 

Word 2 Number of running copies of the program 
Word 3 through end Program name 


If there are more resident programs, entries continue by repeating Words 1 through 3 
for the remaining number of resident programs. 


SUBTYPE 69 Calls (Initialize Data Comm) 


For SUBTYPE 69 calls, GETSTATUS returns information about the data comm 
subsystem. This call is equivalent to the ID system command. 


Input 


Use the following input information for array ARY: 


ARY Value or Description 
-ARY [0] 2 
ARY [1] 0 


Use the following MASK bits to obtain information: 


MASK Bit Description of Result 
15 Link to data comm network information file (NIF) prefix 
20 Link to next (if any) data comm NIF prefix 
30 MAXPSEUDO stations 
32 Data comm audit options 
33 Next value of MAXPSEUDO stations 
Call 


B := GETSTATUS (2 & 69 [15:88], 9, MASK, ARY); 
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Results Returned 


A[1].[32:17] is the index to the validity mask in the array ARY. If a validity mask bit is 
on, then the information for the corresponding MASK bit is present in the array ARY. 
Each item is located in ARY [ARY [1].[82:17] + bit number + 1]. 


SUBTYPE 70 Calls (HYPERchannel Adapters) 


For SUBTYPE 70 calls, GETSTATUS returns information about a specific 
HYPERchannel adapter. The call is rejected if the adapter is owned and the caller is not 
the owner of the adapter. There is no corresponding system command for this call. The 
call has five subclasses as follows: 


SUBCLASS Number Description 

SUBCLASS 1 Returns statistics in formatted form 

SUBCLASS 2 Returns statistics in unformatted form 

SUBCLASS 3 Returns and clears statistics in formatted form 

SUBCLASS 4 Returns and clears statistics in unformatted form 

SUBCLASS 5 Returns information in response to a SENSE ADAPTER command 


For SUBCLASS calls 1, 2, 3, or 4, the array ARY must be at least 16 words long. For 
SUBCLASS 5 calls, the array ARY must be at least 174 words long. 


Input 


Use the following input information for the array ARY: 


ARY Value or Description 

ARY [0] 2 

ARY [1] 0 

ARY [3] <adapter number> 

Call 

B := GETSTATUS (2 & 78 [15:88], 1,8, ARY); % for SUBCLASS 1 
B := GETSTATUS (2 & 70 [15:08], 2, 0, ARY); % for SUBCLASS 2 
B := GETSTATUS (2 & 78 [15:08], 3, 8, ARY); % for SUBCLASS 3 
B := GETSTATUS (2 & 78 [15:98], 4, @, ARY); % for SUBCLASS 4 
B @, ARY); % for SUBCLASS 5 


z= GETSTATUS (2 & 78 [15:98], 5, 


Information Returned for SUBCLASS 1 and 3 Calls 


For SUBCLASS 1 or 3, the response in array ARY is returned as follows: 
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ARY Number . Description 

ARY [3] Count of message propers and data buffers sent on trunk 0, in the 
range 0 to (2**24)-1, or 16,777,215. 

ARY [4] Count of message propers and data buffers sent on trunk 1, in the 
range O to (2**24)-1, or 16,777,215. 

ARY [5] Count of message propers and data buffers sent on trunk 2, in the 
range 0 to (2**24)-1, or 16,777,215. | 

ARY [6] Count of message propers and data buffers sent on trunk 3, in the 
range 0 to (2**24)-1, or 16,777,215. 

ARY [7] Count of canceled operations, in the range 0 to (2**12)-1, or 
4095. 

ARY [8] Count of terminations due to hardware malfunction or deadman 
timeout, in the range 0 to (2**12)-1, or 4095. 

ARY [9] Count of retransmissions on trunk O, in the range O to (2**24)-1, or 

- 16,777,215. 

ARY [10] Count of retransmissions on trunk 1, in the range 0 to (2**24)-1, or 
16,777,215. 

ARY [11] Count of retransmissions on trunk 2, in the range 0 to (2**24)-1, or 
16,777,215. 

ARY [12] Count of retransmissions on trunk 3, in the range O to (2**24)-1, or 
16,777,215. 

ARY [13] Model number of the adapter from which statistics were taken. This 
number is a 4-hexadecimal-digit number that is right-justified in the 
word. 

ARY [14] Revision level of the adapter from which statistics were taken. This 


number is in the range 0 to 255, inclusive. 


ARY [15] Adapter trunk address of the adapter from which statistics were 
taken. This number is in the range 0 to 255, inclusive. 


Information Returned for SUBCLASS 2 and 4 Calls 


For SUBCLASS 2 or 4 calls, the response is placed beginning in word 3 of the array 
parameter ARY. This response is identical to the result returned by the adapter itself in 
response to the corresponding operations to the adapter. 


A soft error code word is returned in array ARY [1] if the adapter does not exist on the 
local system or there was an error in reading the statistics. 


Information Returned for SUBCLASS 5 Calis 


For SUBCLASS 5 calls, array ARY must be at least 174 words long. GETSTATUS 
places the response beginning in A [3] of the array parameter. This response is identical 
to the information returned by the adapter in response toa SENSE ADAPTER 
command. Refer to the appropriate Network Systems Corporation adapter reference 
manual for the format of the data. 
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SUBTYPE 71 Calls (Support Libraries) 
For SUBTYPE 71 calls, GETSTATUS returns information about the support libraries 


defined with the system command SL (Support Library). For more information, refer to 
the System Commands Reference Manual. 


SUBCLASS 1 Calls 
Use SUBCLASS 1 calls to return information for all functions defined in the SL table. 


Input 


Use the following input information for array ARY: 


ARY Value or Description 
ARY [0] y 2 
ARY [1] 0 

Call 


B := GETSTATUS (2 & 71 [15:08], 1, 0, ARY); 


Results Returned 


For SUBCLASS 1 calls, GETSTATUS returns SL information in array ARY as follows: 


ARY Number Value or Description 

ARY [0] 2 

ARY [1] 0 

ARY [2] SL table information. 

ARY [2].[39:20] The number of entries in the table. 


continued 
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continued 
ARY Number Value or Description 
ARY [3] through end Contains table entries. Each entry is as follows: 
e@ ARY [n] = Information about the function: 


~  ARY [n].[47:08] = The length of the entry in words, 
including this word. 


- ARY [n].[38:01] is the SYSTEMFILE bit. 

—  ARY [n].[36:01] = 1 if a pending title is present. 
— ~ARY [n].[35:01] is the MCPINIT bit. 

- ARY [n].[34:01] is the TRUSTED bit. 

-  ARY [n].{33:01] is the ONEONLY bit. 

— ARY [n].{3.1:04] contains the LINKCLASS. 


e ARY [n+1] through ARY [n+3] = Function name in 
substandard form. 


e ARY [n+4] through ARY [n+ARY [n].[47:08]-1] = The file title 
(or titles if a pending title is present) in standard form. Each 
title starts at a word boundary. 


SUBCLASS 5 Calls 


Use SUBCLASS 5 calls to return information for a designated function. 


Input 


Use the following input information for array ARY: 


ARY Value or Description 

ARY [0] 2 

ARY [1] 0 

ARY [2] through ARY [4] Function name in substandard form 
Call 


B := GETSTATUS (2 & 71 [15:08], 5, 0, ARY); 


Results Returned 


For SUBCLASS 5 calls, GETSTATUS returns soft error 216 if the named function is not 
defined; otherwise, GETSTATUS returns the SL information in array ARY as follows: 
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ARY Number Value or Description 
ARY [0] . 2 
ARY [1] Contains information about the function: 
e ARY [1].[47:08] = The length of the entry in words, including 
this word. 


e ARY[1).[38:01] is the SYSTEMFILE bit. 

e ARY([1].[36:01] = 1 if a pending title is present. 
e = ARY [1)}.[35:01) is the MCPINIT bit. 

e ARY [1).[34:01] is the TRUSTED bit. 

e  ARY [1].[33:01] is the is the ONEONLY bit. 

e ARY[1].[31:04] contains the LINKCLASS. 


ARY [2] through Function name in substandard form. 
ARY [4] 
ARY [5] through end File title (or titles if a pending title is present) in standard form. Each 


title starts at a word boundary. 


See the example of aSUBTYPE 71 GETSTATUS call at the end of this section. 


SUBTYPE 76 Calls (Logging) 


ASUBTYPE 76 call corresponds to the system command LOGGING. SUBCLASS 1 
retrieves all LOGGING specifications. SUBCLASS 2 retrieves a specific LOGGING 
<major> and <minor> type. . 


Input for SUBCLASS 1 Calls 


Use the following input information for array ARY: 


ARY Value or Description 
ARY [0] 2 
Call 


B := GETSTATUS (2 & 76 [15:98], 1, ®, ARY); % for SUBCLASS 1 


Input for SUBCLASS 2 Calls 


Use the following input information for array ARY: 


ARY Value or Description 
ARY [0] 2 

ARY [1] . 0 

ARY [2] MAJOR type 


continued 
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continued 
ARY Value or Description 
ARY [3] MINOR type 

Call 


B := GETSTATUS (2 & 76 [15:08], 2, @, ARY); % for SUBCLASS 2 


. Results Returned 


ARY[0] contains a pointer to the log-setting stream. ARY [ARY [0]] through the end 
contains the log-setting stream. The log-setting stream is a sequence of 16-bit items. 


For SUBCLASS 1, the log-setting stream is returned in the following format: 


Number of 
Items Size of Each Description 
1 16-bit Number of MAJOR types defined. Number = M. 


The specification “LOGGING *” is an exception if 
M is greater than or equal to 4"FFOO". 


M 16-bit A MAJOR-type specification. The value for the 
MAJOR type is S. 


if S > = 4"FFOO", this log setting is a 
MAJOR-type. S — 4"FFOO" is the log setting for all 
MINOR types that are associated with the MAJOR 
type. 


If S < 4"FFOO", this item is a pointer to a 
MINOR-type specification at 
POINTER (A [A[O]]) + S. 


The MINOR-type specification is in the format that follows. 


Number of 

items Size of Each Description 

1 16-bit Number of MINOR types defined. Number = m. 
m 8-bit A MINOR-type log setting whose value = s;s is 


the setting for the combination M,m. 


For SUBCLASS 2, word 1 of array ARY contains the log setting for MAJOR type 
followed by MINOR type. - 


For both cases (SUBCLASS 1 or SUBCLASS 2), the log setting is an 8-bit item that 
reflects the logging for the applicable major type or combination of MAJOR type and 
MINOR type. The lower 4 bits reflect logging to the SUMLOG, while the upper 4 bits 
reflect logging to the job file. Every log record has a result indicator to indicate the type 
of record. All 8-bit log setting values are independent for each applicable MAJOR type or 
combination of MAJOR type and MINOR type. 


The bit combinations and their results are as follows: 
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SUMLOG Job File Log Record Result Indicator 

Bit 0 Bit 4 | If turned on, success records are being logged. 

Bit 1 Bit 5 If turned on, failure records are being logged. 

Bit 2 Bit 6 If turned on, security-relevant records are being 
logged. 

Bit 3 Bit 7 lf turned on, security violation records are being 
logged. 


SUBTYPE 78 Calls (SUPPRESSWARNING) 


This call retrieves a copy of the system warning array or part of the array in which the 
system stores the list of warnings to be suppressed. The information stored in the 
suppress warning array is either zero, or one or more 2-byte entries terminated by two 
bytes of all zeros. 


Each 2-byte entry is either a warning number to be suppressed or the first or last 
number in a range of warnings to be suppressed. The last number in a range of warnings 
has bit [15:01] on. To tell whether an individual 2-byte entry is the first number of a 
range of warnings to be suppressed or a single warning to be suppressed, check bit 
[15:01] of the next 2-byte entry. If it is on, then the two 2-byte entries represent a range 
of warnings to be suppressed. Otherwise, the first 2-byte entry represents a single 
warning to be suppressed. 


Since it is normally small, you can usually retrieve a copy of either the entire warning 
array or any portion of it. In either case, use array ARY[1] (word 1) to indicate the 
starting index of the information that you want to retrieve from the system warning 
suppression array. To retrieve the entire array, set ARY[1] equal to zero. GETSTATUS 
then copies as many words from the system warning array as will fit in the array 
parameter array, starting at the word in the system warning array that you specified. 


If GETSTATUS retrieves the entire warning array, or the remainder of the array, it 
stores a zero in array ARY[0]. Otherwise, it stores the index of the next word in the 


system warning array in array ARY[0]. In this case, to retrieve the rest of the array, put 
that index value into ARY[1] and repeat the GETSTATUS call. 


TYPE Parameter 


The TYPE parameter has the following values: 


Field Value 

[07:08] 2 (TYPE) 

[15:08] 78 (SUBTYPE) 
Input 


Use the following input information for array ARY: 
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ARY Value or Description 

ARY{0] 2 

ARY{1] O or starting index in system warning array 
Call 


B := GETSTATUS (2 & 78 [15:08], 0, @, ARY); 


Example 


This example displays the numbers of suppressed warnings. In this example, the array 
parameter has been made large enough to hold the largest possible copy of the system 


warning array. 

BEGIN 

BOOLEAN RSLT3; % ERROR INDICATOR FROM GETSTATUS 

ARRAY ARY [@:7286]; % ARRAY PARAMETER FOR GETSTATUS 

POINTER PARY; % POINTER INTO “ARY" 

ARRAY D [@:2]; POINTER PD; 
ARY [@] := 2; 
ARY [1] := 9; 


IF RSLT := GETSTATUS (2 & 78 [15:8], 8, @, ARY) THEN 
PROGRAMDUMP (ARRAYS) % ERROR 
ELSE 
BEGIN 
PARY := POINTER (ARY [3]); 
IF PARY = 48"9990" THEN % -NONE- 
DISPLAY ("NONE") 
ELSE 
DO % LOOP OVER THESE WARNING NUMBERS 
BEGIN 
REPLACE POINTER (D) BY " " FOR 18; 
REPLACE PD:POINTER (D) BY REAL (PARY, 2) FOR * DIGITS; 
PARY := *+23 
IF BOOLEAN (REAL (PARY, 2)).[15:1] THEN 
BEGIN % IT'S ARY RANGE OF WARNING NUMBERS 
REPLACE PD BY " TO ", 
(REAL (PARY, 2).[14:15]) FOR * DIGITS; 
PARY := * + 23 % SKIP EXTRA 2 BYTES 
END; 

DISPLAY (POINTER (D))3; 


END 

UNTIL REAL (PARY, 2) = 83 
END; 
END. 
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SUBTYPE 80 Calls (Time Zone Name) 
Use this SUBTYPE to return the name and information about the time zone specified at 


the installation. Refer to the TR (Time Reset) system command for an explanation of 
how to set the date, the time, and the time zone. 


TYPE Parameter 


The TYPE parameter has the following values: 


Field Value 

[7:08] 2 (TYPE) 

[15:08] 80 (SUBTYPE) — 

[37:01] | 0 OR 1 (MLS indicator). Indicates whether the time zone 


name should be returned in a particular language. If the 
MLS indicator is 0, the time zone name is returned in the 
language of the calling task. If the MLS indicator is 1, place 
the name of the desired language in substandard format 
starting in word A [SIZE (A) - 6]. 


Input 


Use the following input information for array ARY: 


ARY Value or Description 
ALO] 12 | 
Call 


B := GETSTATUS (@ & 2 [7:08] & (88) [15:98] 
& (MLS indicator) [37:01], 2, 9, A); 


Examples 
The following example shows the code to use to retrieve the time zone name in Spanish: 


A[@] := 123 
REPLACE A [SIZE (A) -6 }] BY 48"07", "ESPANOL"; 
B := GETSTATUS (@ & 2 [7:08] & (88) [15:98] 

& 1 [37:81], 8, 8, A); 


The following example shows the code to use to retrieve the time zone name in the 
language of the task (or the default system language): 


A[@] := 12; 


B := GETSTATUS (@ & 2 [7:88] & (80) [15:28] 
& @ [37:01], 2, B, A); 
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Results Returned 


If the system does not have a time zone specified, then GETSTATUS stores zeros in 
words 1 through 12 of the array parameter. Otherwise, GETSTATUS returns the 
following information for SUBTYPE 80 calls: 


ARY . Value or Description 


A[]] Predefined time zone number or zero. (Refer to the TR Call 
(Extended Version) subsection of Section 9, SETSTATUS 
Request Type 2 Miscellaneous Requests) in this manual for a 
list of predefined time zones.) 


A[2] Offset direction and time zone validity indication: 
e 0O= Notime zone configured. 


@ 1 = Add offset to universal time (UT) to produce local 
time. 


e 2 = Subtract offset from UT to get local time: 


A[3] Hours offset (0 through 24). 
A[4] Minutes offset (O through 59). 
A [5] through A [12] Time zone name in substandard form followed by the time 


zone abbreviation in substandard form (as designated for 
custom names; or translated into requested language, task 
language, or system language for predefined time zones). 


SUBTYPE 85 Calls (SYSTEMACCOUNTING) 


3-38 


Use this SUBTYPE to return information about attributes for dependent task 
accounting and file accounting. On InfoGuard systems, only security administrators can 
use this option. 


Input 


Use the following input information for array ARY: 


ARY Value or Description 
ARY [1] 2 
Call 


B := GETSTATUS (2 & 85 [15:08], 8, O, ARY); 


Results Returned 


GETSTATUS returns the following values for array ARY: 
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ARY | Value or Description 
ARY [1] This field contains one of the following values: 
e 0 = UNSPECIFIED dependent task accounting 
@ 1 = ANONYMOUS dependent task accounting 
e 2 = IDENTIFIED dependent task accounting 
ARY [2] This field contains one of the following values: 
e 0O= UNSPECIFIED file accounting 
e 1 = ANONYMOUS file accounting 
e 2 = IDENTIFIED file accounting 
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Examples of Miscellaneous SUBTYPE 1, 2, 12, and 71 
GETSTATUS Calls 


3-40 


BEGIN 
DEFINE | 
XSLINKF = [32:17] #, 
BASE = ARY[1].XSLINKF #, 
GSITEM (ARY,BITNO) = ARY [BASE+BITNO+1] #, 
GSMASK (ARY,BITNO) = BOOLEAN (ARY[BASE].[BITNO:1]) # 


GSNAME (ARY,BITNO) = (BASE + GSITEM (ARY,BITNO) .[32:17]) #; 


ARRAY ARY[@:255], BUF[@:22], SCRATCH[@:22]; 
POINTER P,Q; 

REAL TEMP,COUNT,J,Z; 

BOOLEAN GSRSLT; 

FILE LINE(KIND=PRINTER) ; 


PROCEDURE MASKTOLIST(MSK1,MSK2,TOPBITNO,P) ; 
VALUE MSK1,MSK2, TOPBITNO; 
REAL MSK1,MSK2, TOPBITNO; 
POINTER P; 
BEGIN 
REAL L,K,N; 
BOOLEAN ONOFF; 
LABEL START; 


START: 
FOR L := @ STEP 1 UNTIL TOPBITNO DO 
BEGIN 
IF NOT(BOOLEAN(MSK1).[L:1] EQV ONOFF) THEN 
BEGIN 
IF (ONOFF := NOT ONOFF) THEN 
REPLACE P:P BY (N := L+K) FOR * DIGITS 
ELSE 
BEGIN 
IF N ISNT (N := L+K-1) THEN 
REPLACE P:P BY "-", N FOR * DIGITS; 
REPLACE P:P BY ","; 
END; 
END; 
END; 
IF MSK2 ISNT @ THEN 
BEGIN 


MSK1 := READLOCK(@,MSK2) ; 
K := TOPBITNO+1; 
GO TO START; 
END; 
IF ONOFF AND BOOLEAN(MSK1.[TOPBITNO-1:1]) THEN 
REPLACE P:P BY "-", (N := TOPBITNO+K) FOR * DIGITS; 
IF P-1 = "," THEN 
REPLACE P-1 BY " "$s 
END MASKTOLIST; 
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ARY([@] := 23 
ARY[1] := 9; 
GSRSLT := GETSTATUS(@ & 2 [7:8] & 1 [15:8],0,@ & 1 [3:1],ARY); 
TEMP := GSITEM(ARY,3); 

REPLACE BUF BY " " FOR 132; 

IF TEMP = & THEN 

REPLACE BUF BY "THE MIX IS EMPTY" 


ELSE 
IF TEMP = 1 THEN 
REPLACE BUF BY “THERE IS ONE JOB IN THE MIX" 
ELSE : 
REPLACE BUF BY "THERE ARE ",TEMP FOR * DIGITS, 
" JOBS & PROGRAMS IN THE MIX"; 
WRITE(LINE,14,BUF) ; 


ARY[@] := 23 
ARY[1] := 9; 
GSRSLT := GETSTATUS(@ & 2 [7:8] & 2 [15:8],0,0 & 1 [8:1],ARY); 
TEMP := GSNAME(ARY,8); 
COUNT := ARY[TEMP]+ARY[TEMP+1]+ARY[TEMP+2] ; 
REPLACE BUF BY " " FOR 132; 
REPLACE BUF BY "AVAIL=", ARY[TEMP] FOR * DIGITS, 
" OLAY=", ARY[TEMP+1] FOR * DIGITS, 
" SAVE=", ARY[TEMP+2] FOR * DIGITS, 
" * TOTAL=", COUNT FOR * DIGITS; 
WRITE (LINE, 14, BUF) ; 


ARY[@] := 2; 
ARY[1] := 9; 
GSRSLT := GETSTATUS(@ & 2 [7:8] & 1 [15:8],0,0 & 1 [15:1], ARY); 
REPLACE BUF BY " " FOR 132; 
REPLACE P:POINTER(BUF) BY “DC PREFIX : "$ 
IF GSMASK(ARY,15) THEN 
STANDARDTODISPLAY (POINTER( ARY [GSNAME (ARY, 15)]),P) 
ELSE 
REPLACE P:P BY "NOT SPECIFIED "; 
WRITE(LINE,14,BUF) ; 
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Psseaenesreseusenasnocee SC INFORMATIONHas+2esseecoee-eleceesncesees 
ARY[@] := 2; 
ARY[1] := 9; | 
GSRSLT := GETSTATUS(@ & 2 [7:8] & 2 [15:8],9, 


®&1 [1:1] & 1 [2:1] & 1 [11:1], ARY); 
REPLACE BUF BY " " FOR 132; 
REPLACE BUF BY "=SYSTEM CONFIGURATION="; | 
WRITE (LINE,14,BUF) ; 


REPLACE BUF BY " " FOR 132; 
TEMP := GSITEM(ARY,1); 
REPLACE P:POINTER(BUF)+5 BY ONES(TEMP) FOR * DIGITS," PROCESSOR"; 
IF ONES(TEMP) > 1 THEN 
REPLACE P:P BY "S"; 
REPLACE P:P BY " => "3 
MASKTOLIST(TEMP,@,19,P) ; 
WRITE(LINE,14,BUF) ; 


REPLACE BUF BY " " FOR 132; 

TEMP := GSITEM(ARY,2) ; 

REPLACE P:POINTER(BUF)+5 BY ONES(TEMP) FOR * DIGITS, 
" 1/0 PROCESSOR"; 

IF ONES(TEMP) > 1 THEN 
REPLACE P:P BY "S"; 

REPLACE P:P BY " => "5 

MASKTOLIST (TEMP ,@,19,P) ; 

WRITE(LINE,14,BUF) ; 


REPLACE BUF BY " " FOR 1323 

SCRATCH[@] := GSITEM(ARY,11) . [19:48]; 

REPLACE P:POINTER(BUF)+5 BY "DO = ", POINTER(SCRATCH,4) 
FOR 5 WITH HEXTOEBCDIC; 

WRITE (LINE, 14,BUF) ; 

REPLACE BUF BY " " FOR 132; 


ARY[@] := 2; 

ARY[1] := 9; 

GSRSLT := GETSTATUS(® & 2 [7:8] & 1 [15:8],9, 

@ & 1 [7:1] & 1 [30:1],ARY); 

Z := GSITEM(ARY,7); 

REPLACE BUF BY " " FOR 132; 

J := GSITEM(ARY,38); 

REPLACE BUF BY "FACTORS: OLAY GOAL=", Z.[31:16] FOR * DIGITS, 
"; AVAILMIN=", Z.[47:16] FOR * DIGITS, 
"; FACTOR=", Z.[15:16] FOR * DIGITS, 
"; MEM PRIORITY=", J FOR * DIGITS; 

WRITE(LINE,14,BUF) ; 
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ARY[@] := 
ARY[1] := | 

GSRSLT := GETSTATUS(@ & 2 [7:8] & 1 [15:8],@,8 & 1 [@:1],ARY); 
TEMP := GSITEM(ARY,9); 

REPLACE BUF BY "'" FOR 132; 

REPLACE P:POINTER(BUF) BY "SYSTEM OPTIONS SET: "; 
MASKTOLIST (TEMP ,@,47,P) ; 


] 
Mm 
we 


WRITE(LINE, 14, BUF) ; 

diet meseeatee uate cee te de SI SYSTEM COMMAND---------------------------- 
ARY[@] := 23 
ARY[1] := 8; 


GSRSLT := GETSTATUS(@ & 2 [7:8] & 1 [15:8],0,0 & 1 [10:1],ARY); 
REPLACE BUF BY """ FOR 132; 
REPLACE P:POINTER(BUF) BY "INTRINSICS : "; 
IF GSMASK(ARY,18) THEN 

STANDARDTODISPLAY (POINTER (ARY [GSNAME (ARY, 12)]), P) 
ELSE 

REPLACE P:P BY "NOT SPECIFIED."; 
WRITE (LINE, 14,BUF) ; 


ARY[@] := 
ARY[1] : 
GSRSLT : 


I 
iw) 
we 


OB; 
GETSTATUS(@ & 2 [7:8] & 1 [15:8],@, 
® & 1 [16:1] & 1 [17:1] & 1 [19:1] & 1 [21:1] 
& 1 [22:1] & 1 [25:1] & 1 [26:1], ARY); 
REPLACE BUF BY " " FOR 132; 
IF GSMASK(ARY,16) THEN % VALID MCP NAME 
BEGIN 
REPLACE P:POINTER(BUF) BY "MCP :"35 
STANDARDTODISPLAY (POINTER (ARY [GSNAME (ARY, 16)]), P)3; 
TEMP := GSITEM(ARY,19)3 
REPLACE P:P BY " ", TEMP.[47:16] FOR * DIGITS, ".", 
TEMP. [31:16] FOR * DIGITS, ".", 
TEMP.[15:16] FOR * DIGITS; 
WRITE (LINE, 14, BUF) ; 
REPLACE BUF BY " " FOR 132; 
END; 
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IF GSMASK(ARY,17) THEN % COMPILE TIME OPTIONS PRESENT 
BEGIN , 
REAL COUNT; . 
REPLACE P:POINTER(BUF) BY “COMPILETIME OPTIONS:"; 
Q := POINTER (ARY [GSNAME (ARY, 17)]); 
WHILE REAL (Q, 1) ISNT @ DO 


BEGIN 
REPLACE P:P BY Q:Q UNTIL = 48"00", ","; 
Q := Qt; 
IF COUNT := *+1 GEQ 3 THEN 
BEGIN 


WRITE (LINE, 14, BUF); 
REPLACE BUF BY " " FOR 132; 


COUNT := @;3 
P := POINTER (BUF) + 21; 
END; 


END; 
IF COUNT GTR @ THEN 
WRITE(LINE,14,BUF) ; 
REPLACE BUF BY " " FOR 132; 
END; 


P := POINTER(BUF) ; 
IF GSMASK(ARY,21) THEN % HALT/LOAD REASON 
BEGIN 
REPLACE P:P BY "H/L REASON: ", POINTER(ARY[GSNAME(ARY,21)]) 
FOR GSITEM(ARY,21).[15:16], "3 "3 
END; 
IF GSMASK(ARY,22) THEN % HALT/LOAD UNIT 
BEGIN 
REPLACE P:P BY "H/L UNIT: ", GSITEM(ARY,22) FOR * DIGITS, "3; "3 
END; 
WRITE(LINE, 14, BUF) ; 


REPLACE P:= POINTER (BUF) BY " " FOR 132; 

IF GSMASK(ARY,26) THEN % SYSTEM SERIAL NUMBER 
BEGIN 
REPLACE P:P BY "SYSTEM SERIAL NUMBER: ", 

GSITEM(ARY,26) FOR * DIGITS, " 3 "; 


END; 
IF GSMASK(ARY,25) THEN % CATALOG LEVEL 
BEGIN 


REPLACE P:P BY "CATALOG LEVEL: ", 
GSITEM(ARY,25) FOR * DIGITS; 
END; 
WRITE(LINE,14,BUF) ; 
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ARY[@] := 23 

ARY[1] := 9: 

GSRSLT := GETSTATUS(@ & 2 [7:8] & 1 [15:8],0,0 & 1 [8:1],ARY); 
REPLACE BUF BY " " FOR 132; 

REPLACE P:POINTER(BUF) BY "SUPERVISOR : "; 

IF GSMASK(ARY,8) THEN 

STANDARDTODISPLAY (POINTER (ARY [GSNAME (ARY, 8)]), P) 


ELSE 
REPLACE P:P BY "NOT SPECIFIED."; 
WRITE (LINE,14,BUF) ; 


ARY [8] := 2; 
ARY[{1]:= @; 
REPLACE POINTER (ARY[2]) BY 48"9C" 8"USERFUNCTION"; 
GSRSLT := GETSTATUS (9 & 2 [7:8] & 71 [15:8], % GET FUNCTION 
5, 8, ARY ); 
IF NOT GSRSLT THEN 
BEGIN 
REPLACE P:POINTER(BUF) BY "SL USERFUNCTION="; 
STANDARDTODISPLAY (POINTER (ARY[5]), P); 
IF ARY[{1] ISNT @ THEN 
BEGIN 
REPLACE P:POINTER(BUF) BY "3; "; 
STANDARDTODISPLAY (POINTER(ARY[5+((ARY[5] .[47:8]+5) DIV 6)]), 
P); 
_ REPLACE P:POINTER(BUF) BY “ PENDING"; 
END 
END 
ELSE 
REPLACE P:POINTER(BUF) BY “FUNCTION USERFUNCTION IS NOT DEFINED"; 
WRITE(LINE, 14,BUF) ; 
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REPLACE BUF BY " " FOR 132; 
ARY[@] := 2; 
ARY[1] := 3 
GSRSLT := GETSTATUS( @ & 2 [7:8] & 12 [15:8], 
6, © & 1 [11:1], ARY); 
IF NOT GSRSLT THEN 
IF GSMASK (ARY, 11) THEN 
BEGIN | 
REAL LANGCNT, AI; 
WRITE (LINE, <"MCP MLS LANGUAGES">) ; 
AI := GSNAME (ARY, 11); 
LANGCNT := ARY[ AI ];3 
Al 25.7 4 
FOR J:= @ STEP 1 UNTIL LANGCNT-1 DO 
BEGIN 
REPLACE POINTER (BUF) BY" ", 
POINTER( ARY[ AI + J*3 ], 8) +1 
. FOR ARY[ AI + J*3 ]. [47:98]; 
WRITE (LINE, 14,BUF) ; 
REPLACE BUF BY " " FOR 132; 
END; 
END; 
END. 


Output from Examples 


THERE ARE 186 JOBS & PROGRAMS IN THE MIX 

AVAIL=27544448 OLAY=3450875 SAVE=2183285 * TOTAL=8388628 
DC PREFIX : MPA15/C 

=SYSTEM CONFIGURATION= 

1 PROCESSOR => 5 

1 1/0 PROCESSOR => @ 

DO = 92100 | 
FACTORS: OLAY GOAL=@; AVAILMIN=9; FACTOR=1@0; MEM PRIORITY=0 
SYSTEM OPTIONS SET: 2,4-4,8,12,14,16,19-21,24-27 49 
INTRINSICS : SYSTEM/INTRINSICS 
MCP :SYSTEM/ASD/MCP/38@42/DIAG 3.8.42 
COMPILETIME OPTIONS: TRACE DIAGNOSTICS, EXPERIMENTAL, 

LINEINFO, LOCKTRACE ,READLOCK, 
READLOCKTIMEOUT , RESTART , FREEZEOUTTC, 
| ASD, — | 
H/L REASON: HARDWARE = ;_H/L UNIT: 75; 
SYSTEM SERIAL NUMBER: 8 ; CATALOG LEVEL: 9 
SUPERVISOR : SUPPRESS/MIX/NOS 
FUNCTION USERFUNCTION IS NOT DEFINED 
MCP MLS LANGUAGES 
ENGLISH 
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section 4 
GETSTATUS Request Type 3 
(Directory Calls) 


GETSTATUS directory calls can be used to retrieve information about disk directories, 
catalogs, disk families, disk files, and cataloged tape files. 


The general GETSTATUS call is as follows: 
B := GETSTATUS (TYPE, SUBCLASS, MASK, ARY); 


The following information describes parameter definitions for TYPE. The parameters 
SUBTYPE, MASK, and ARY are described in detail later in this section. 


TYPE 


This parameter generally selects the specific case and subcase within the GETSTATUS 
intrinsic. For directory requests, the fields within this word are as follows: 


TYPE.TYPEF [07:08] = 3 


SUBTYPEF = [15:08] 


The field SUBTYPEF designates the SUBTYPE of the directory search These 


SUBTYPEs are as follows: 
SUBTYPE Description 
0 This request searches for one or more specified files or directory. 


SUBTYPE 0 corresponds to the system command PD <file name> 
ON <family> . PD stands for Print Directory. 


1 This initial request searches for all files under a specified directory name. 
SUBTYPE 1 corresponds to the system command 
PD <directory name/= > ON <family>. 


2 | This request is referred to as a continuation request and can be used 
after a SUBTYPE 1 or a SUBTYPE 2 call that has returned an indication 
that more files exist under the initial directory of the designated file 
name. 


Reserved. 


This SUBTYPE is also a continuation request. You can use it after a 
SUBTYPE 1 or SUBTYPE 4 call has returned an indication that more 
files exist under the directory. 


5 This subtype requests that a copy of the volume library be made. 


continued 
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continued 

SUBTYPE Description 

6 This request returns the total amount of available space on a family or a 
family member. 

7 This SUBTYPE requests that a complete family directory be copied to a 
designated file. 

8 This request is no longer available. 

9 This request copies all volume directory data records. You can use this 
request only if you are a privileged user. 

10 This request copies only volume directory data records whose 
FAMILYOWNER matches the usercode of the process. 

11 This request reads an archive directory record for a given file on a given 
disk family. 

12 This request copies all archive data records from the archive directory for — 
a given family to a new disk file. 

13 This request copies archive records for files under a designated usercode 
or an asterisk (*) usercode from the archive directory for a given family to 
a new disk file. 

14 This request returns information about disk files that are currently open 


or in use by the system or a program. SUBTYPE 14 corresponds to the 
system command SHOWOPEN. 


Other bits are used in the TYPE parameter for SUBTYPEs 0, 1, 2, and 4. They are as 


follows: 


RETURNRESIDENTFE = [37:01] 


If this bit is turned off for SUBTYPES 1, 2, and 4, GETSTATUS reports only on 
resident disk files and on directory names that have a level equal to the MAXLEVEL 
designated in the SUBCLASS parameter. Otherwise, GETSTATUS reports on resident 
disk files, nonresident archived disk files, nonresident cataloged disk files, cataloged tape 
files, and directories. 


ONLYSYSTEMFILESF = [38:01] 


This bit limits the GETSTATUS search to system files (the directory for nonusercoded 
files) and is applicable only to SUBTYPEs 1, 2, and 4. 


DISPLAYFORMNAMEF = [39:01] 

If this bit is turned off, the file and directory names passed to GETSTATUS and 
returned by GETSTATUS are in standard form. For information about standard form, 
refer to the DISPLAYTOSTANDARD function in the DCALGOL Reference Manual. 


If the DISPLAYFORMNAMEF bit is turned on, it indicates that the requested and 
returned < file names> are in display form format for SUBTYPEs 1, 2, and 4. If this bit 
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is on, bit 40 (RETURNFULLNAMEF) must also be on. If RETURNFULLNAMEF is off, 
GETSTATUS returns hard error 51. Refer to Appendix A in this manual for a listing of 
hard error messages. 


Each display form name returned is in the following format: 


<two byte-length characters> <display form name> 
Y] 
The two byte-length characters contain the length of the display form name in binary 
form. The normal decimal point is not appended as a delimiter to the display form name 
variable. 


RETURNFULLNAMEF = [40:01] 


This bit instructs GETSTATUS to return the full file name instead of the simple form 
name list. 


If RETURNFULLNAMEF is turned off for SUBTYPEs 1, 2, and 4, GETSTATUS 
returns a file status word for each file and directory encountered. For example, if files 
A/B/C/X and A/B/C/Y exist and a SUBTYPE 1 call for A/B is issued, A, B, C, X, and Y are 
reported. 


If RETURNFULLNAMEF is turned on for SUBTYPESs 1, 2, and 4, GETSTATUS 

reports only on full file names and directories limited by the SUBCLASS.MAXLEVELF 

parameter. For example, if A/B/C/X and A/B/C/Y exist and a SUBTYPE 1 call for A/B is 
- issued, files A/B/C/X and A/B/C/Y are reported. 


USERCODEONLYF = [41:01] 


This bit inhibits the secondary search of the system directory (the directory for 
nonusercoded files). It does so if the specified file or directory is not found under the 
process usercode directory and the original security byte was 1 (it had no explicit 
asterisk or usercode). USERCODEONLYF has effect only if the process is running 
under a usercode or if the file name or directory name is specified with an asterisk (*) or 
an explicit usercode. 


RETAINUSERCODEF = [42:01] 


If RETAINUSERCODEF is turned on, GETSTATUS reports the true file name of the 
files located. If RETAINUSERCODEF is off, the process is running under a usercode, 
and the caller designated a file or directory name without a usercode or an asterisk (*), 
GETSTATUS returns the file name without the process usercode Se erOey name under 
which the file was found. 


WAITFORFILEF = [43:01] 


This bit instructs GETSTATUS to wait for the designated family <on part> to be 
mounted if the family is not present at the time of the GETSTATUS call. 
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GSLINKINONPARTFE = [45:01] 


If this bit is turned on, GETSTATUS appends the family name to the file name reported 
when TYPE.RETURNFULLNAMEF is turned on. The family name will be the actual 
family name that was used after applying family substitution. . 


SUBCLASS Parameter for SUBTYPE 0, 1, 2, 
and 4 Calls 


The following definitions pertain to the SUBCLASS parameter for SUBTYPE 0, 1, 2, 
and 4 calls: 


MAXCATLEVELF = [47:08] 


This field is applicable only if MASK bit 16 is turned on. This field allows the caller to - 
limit the number of file generations returned from the catalog system. For details, refer 
to Table 4-2. The value 0 in this field indicates that all file entries are to be returned. 
Otherwise, the number is designated with this field. 


CDROMF = [39:01] 


_ When this field is equal to 1, the family name found within the ARY GETSTATUS 
' parameter refers to a CD-ROM instead of a disk pack. 


ORGLEVELF = [38:19] 


For aSUBTYPE 2 continuation request, this field indicates the number of levels in the 
continuation name that were in the original SUBTYPE 1 request. The number of levels 
can be retrieved from ARY[1].LEVELF after a TYPE.SUBTYPEF = 1, 2, or 4 call. 


MAXLEVELF = [19:20] 


For SUBTYPEs 1, 2, and 4, when TYPE.MAXLEVELF is not equal to 0, the level of 
searching is limited to the value in TYPE.MAXLEVELF names above the number of 
levels of the original directory name. For example, if the original directory name was 
A/B and MAXLEVELF equals 1, GETSTATUS restricts its search to all names under 
the initial directory of A/B plus one more level; that is, if the files A/B/C/D and A/B/E 
are present, GETSTATUS returns information about the directory A/B/C and the file 
A/B/E, but not about the file A/B/C/D. This call corresponds to the system command 
PD A/B/=1. 


MASK Parameter for SUBTYPE 0, 1, 2, and 4 Calls 


Each bit in the MASK word for SUBTYPE 0, 1, 2, and 4 calls indicates a specific 

piece of data that is to be returned about the designated files (refer to Table 4-1). If 
MASK is 0 or 1, GETSTATUS returns a one-word summary of each file or directory 
located. Otherwise, for each file located, GETSTATUS also returns the attributes that 
correspond to the MASK bits selected. 
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Note: All available attributes can easily be retrieved by turning on all 
the bits in MASK. However, some of the information, such as the 
image of the disk file header (bit 8) or the row address words (bit 33), 
might consume a large number of words in ARY. If information for 
several files is to be retrieved with a single GETSTATUS call, it is 
more efficient to use MASK bits to select only the information that is 
needed. 


Array Parameter for SUBTYPE O, 1, 2, and 4 Calls 


ARY is used to pass parameter information to GETSTATUS. GETSTATUS then stores 
result information in the array ARY. The input data in ARY is used by GETSTATUS to 
determine the files and directories to retrieve. The structure of the input values for ARY 
is explained in the discussion for the specific SUBTYPES: 

e Searching for a specific file 

e Searching for all files under a given directory 

e Continuing a directory search 


The array ARY can be segmented. In addition to the general limits on the values 
that GETSTATUS accepts in ARY [0].[19:20] and ARY [0].[39:20], directory 
requests have other limits (refer to “ARY Limits” in Section 1). For all directory 
GETSTATUS calls, SIZE (ARY) must be less than 21846, and ARY [0].[19:20] must 
be less than 2048. Otherwise, hard error 40, Boolean (1 & 40 [11:08]), is returned. 
Refer to Appendix A for a listing of hard errors. 


The following definitions pertain to the format of various words in the array ARY. 
- ERRORF = [47:01] 
~- ERRORVALUEF = [46:08] 
- ADDLINFOF = [46:08] | 
- VALUEF = [88:06] This field is divided into three subfields: 
© SUBVALUE2F = [38:02] 
°o SUBVALUESF = [36:01] 
°o SUBVALUEIF = [35:03] 


- LINKF = [82:17] 
In pointer or link words, this field usually contains a character or word index. 
- INFOF = [15:16] 


In pointer or link words, this field usually contains the length of the referenced 
item in characters or words. 


- NEXTLEVELLINKF = [15:11] 
- RESIDENTSTATEF = [04:01] 
- LEVELF = [03:04] 
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Family Name Information for SUBTYPE 0, 1, 2, and 4 Calls 


The family name on which the directory or files are to be found should be included in the 
display form or standard form names supplied in the array ARY. If the caller does not 
supply the family name, GETSTATUS uses the family name DISK. If the process has 

an active family substitution and the family name to be searched matches the family 
substitution target name, GETSTATUS applies family substitution. If the requested 
file or directory cannot be located after substituting the primary name, GETSTATUS 
searches the secondary substitute (if present). To search for cataloged tape files, use the 
family name TAPE. 


A potential four-way search can be performed under the following circumstances: 
e Ifthe process is running under a usercode, the file name to be located does not 


specify a usercode or an asterisk (*). 


e Ifboth TYPE.ONLYSYSTEMFILESF and TYPE.USERCODEONLYF are turned 
off. 


e IfGETSTATUS invokes family substitution with an OTHERWISE clause. 
The order of searching used by GETSTATUS is not the normal order that would be 
used. GETSTATUS tries four searches in the following order: 

1. Under the task usercode on the primary family 

2. Under the task usercode on the secondary family 

3. Under the asterisk (*) directory on the primary family 

4. Under the asterisk (*) directory on the secondary family 


The previous sequence differs from normal system searches because steps 2 and 3 are 
reversed. The first search that succeeds terminates the search. 


General Format of Results from SUBTYPE 0, 1, 2, and 4 
Directory Calls 


GETSTATUS reports on the status of a file with one of three structured words. In this 
section, the three kinds of words used are called soft error words, file status words, and 
fixed info link words. When the information to report for a file cannot fit in one word, 
GETSTATUS uses a fixed info link word to point to the extra information. 


Soft Error Word 


If bit 47 of the word is turned on, an error caused GETSTATUS to terminate the report 
for the file. Soft error words are structured as follows: 


e ERRORF = [47:01] 


This bit is turned on; it distinguishes soft error words from file status words and 
fixed info link words. 
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e ERRORVALUEF = [46:08] 


The ERROFVALUFF field contains the soft error number. Refer to Appendix B for 
a listing of soft errors. 


File Status Word 


If bit 47 of the word is turned off and the field [3:04] contains a value greater than 0, 
the word is a file status word. A file status word indicates the general status of the file, 
directory, or both and contains a link to the file or directory name. 


File status words are structured as follows: 


e [47:01] = 0 
e ADDLINFOF = [46:08] 

For resident disk files, this field contains the FILEKIND. 
e VALUEF = [38:06] . 

VALUEF is divided into three subfields: 
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The value in this subfield indicates the kind of entry represented by this word, as 
follows: 


Value Description 

0 Reserved. 

1 This entry is a file. 

Z This entry is a directory. 

3 This entry is a file and a directory. 


SUBVALUESF = [36:01] 
The number 1 in this subfield indicates that the file is in use. 
SUBVALUEIF = [35:08] 


If TYPE.RETURNFULLNAMEF is turned on, this field contains a copy of the 
lower three bits of the qualification byte of the standard file name. 


If TYPE.RETURNFULLNAMEF is turned off for SUBTYPE 0, this field returns 
a 2 if the file is from the system directory or a 3 if the file is from a usercode 
directory. 

Otherwise, this field is 0 when the LEVELF field does not contain the value 1. 

If the LEVELF field does contain the value 1, the field contains the following 
values: 


Value Description 
0 Reserved. 
1 The file is from the usercode directory of the process, and 
TYPE.RETAINUSERCODEF is turned off. 
2 The file is from the system directory. 
continued 
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continued 


Value Description 


3 The first name of the file is a usercode. 


LINKF = [82:17] 


This field is an absolute character index into the array ARY and points to the file 
name or subpart thereof for SUBTYPE 14. If TYPE.RETURNFULLNAMEF 

is on, GETSTATUS returns the full file name. If the call isa SHOWOPEN call 
(SUBTYPE 14), GETSTATUS also returns the full file name. 


NEXTLEVELLINKF = [15:11] 


This field links together the subnames of the last file name so that the 

last name returned can be recreated. These links are generated only if 
TYPE.RETURNFULLNAMEF is OFF and SUBTYPEF equals 1, 2, or 4. Ifa 
subsequent SUBTYPE 4 call is made, the information in these links is used by 
GETSTATUS to determine the continuation point. 


RESIDENTSTATEF = [04:01] 


This bit is turned on if the file is resident and the TYPE.RETURNRESIDENTF 
parameter bit is on. 


LEVELF = [03:04] ’ 


If TYPE.RETURNFULLNAMEF is turned off, this field indicates the level of the 
name pointed to by the LINKF field. If TYPE.RETURNFULLNAMEF is turned 
on, this field contains the number of levels in the name (excluding the <on part > 
variable). 


The number of simple form names in a file name represents the number of levels in 
the file name. For example, the following file name (in display form) has three levels: 


*A/B/C 


If you create this same name in standard form, it appears as 
48"09020301C101C201C3", where the third byte contains the number of 

levels (8) in the file name. When an <on part> construct is part of the original file 
name, <on part > becomes an additional level to the file name. To indicate that the 
<on part >construct is present in a standard form name, bit 2 of byte 1 is turned on. 
For example, the display form file name of *AA/BB ON C appears in standard form 
as 48"0B060302C1C102C2C201C3". The security byte (byte 1) contains a 6 (with 

bit 2 turned on) and the number of levels (byte 2) is 3. 


Fixed Info Link Word 


4-8 


Fixed info link words stored in the array ARY by GETSTATUS point to the attributes 
and status information for the corresponding file. A fixed info link word is returned 
instead of a file status word for SUBTYPE 0 calls or when GETSTATUS is reporting 
information for a file (fixed info link words are not used for directories) and if bits 
other than bit 0 are turned on in the MASK parameter. When a fixed info link word 
is returned, the second word of the fixed information is the file status word. Refer to 
Figure 4~1 and Table 4—1 for detailed information about fixed info link words. 
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If bit 47 of the word is turned off and field [3:04] contains 0, the word is a link to file 
information words (refer to Table 4-1 and Figure 4-1). Fixed info link words are 
structured as follows: 
e ERRORF = (47:01) 

This value is 0. 
e VALUEF = [88:06] 


FOR SUBTYPE 0 requests, VALUEF retains the original value supplied by the 
caller in the file pointer word. 


e LINKF = [82:17] 


If LEVELF within this word is 0, this field is an absolute word index into the array 
and points to the validity mask word (refer to Figure 4—1). 


e LEVELF = [3:04] 
The value is 0. 


Figure 4-1 is a representation of the words in the array ARY that correspond to the 
MASK bits described in Table 4—1. 
LINKF of = Fixed Info Link Word points 
here (X) 
(X+0) (X+1) (X+2) x (X+N+1) 
Validity | 4 ae for 
Mask Word - MASK Bit N 
File Status Information for 


Word MASK Bit 1 


WORD # 


Figure 4-1. Format of Fixed Information for a File 


GETSTATUS places information in words (X+ 2) through (X +N + 1) only if the 
corresponding bit is turned on in the MASK parameter. Words (X+ 0) and (X+ 1) are 
always returned regardless of MASK bits. 


When additional information is requested about a file (MASK bits other than bit 0 are 
turned on), the corresponding bit in the the validity mask word is turned on for each 
piece of data that GETSTATUS could return. The validity mask bits have a one-to-one 
mapping correspondence with the original MASK word. Bit 0 of the validity mask is 
always on, which means that word (X+ 1) contains a valid file status word. 


When catalog information, archive information, or both catalog and archive information 


for a file exists, some or all of the file attributes for the backed up versions of the file 
might differ from the attributes for the resident file. For example, the FILEKIND 
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reported for the resident file in the file status word (refer to word 1 in Figure 4—1) might 
differ from the FILEKIND reported from a backed up catalog version of the file (refer 

to word 4 in Table 4~3), and they both might differ from the FILEKIND for a backed 

up version of the file listed in the archive directory (refer to word 1 in Table 4-5). The 
resident version and various backed up versions of a file are reported together because 
they all have the same file name. They do not necessarily have to be versions of the 
same file. Only selected information such as the file status word and information for 
MASK bits 9 and 16, MASK bits 13 and 34, or both is available if a file is not resident on 
disk, and a record for the file exists in the archive directory, or if the file is a cataloged file 
and a record exists for it in the catalog. 


If the request is for information on more than one file and the array is not large 

enough to contain the complete information requested, bit ARY[0].[47:01] is turned on. 
GETSTATUS does not return the value TRUE for this case. ARY[0].[19:20] points one 
word beyond the last valid pointer word that was processed. If the array ARY is not 
large enough to contain the information for the first file pointer word, the GETSTATUS 
call returns hard error 41 (refer to Appendix A for a listing of hard error messages). 


Tables 4-1 through 4-5 describe the information that can be returned when some 
parameter MASK bits are turned on. Table 4-1 shows the information returned in the 
array ARY for MASK bit The caller can turn bits on or off in the MASK parameter to 
indicate specific file information that is to be retrieved. The system takes the MASK 
parameter for each file and validates that the requested information is available and then 
indicates the pieces of information that were successfully retrieved by storing bits in the 
validity mask for the file at word ARY [X]. Table 4—2 shows the format of the returned 
catalog information. Table 4—3 describes the cataloged file generation information that is 
returned. Table 4—4 shows the format of archive information returned. Table 4-5 shows 
the format of archive backup information returned. 


In Tables 4—1 through 4-5, the phrase link to means that the word points to information 
returned elsewhere in the array ARY. The LINKF field [32:17] of a normal link word 
contains the character index of the first byte of the information. The INFOF field 
[15:16] of a normal link word contains the length in bytes of the information. 


Table 4-1. File Information 


MASK Bit Fixed Information Returned 


[00:01] MASK bit 0 is not used. 
[01:01] File attribute CREATIONDATE. 
[02:01] Disk blocking is HEADER [3] and contains the following information: 


e [47:16] = BLOCKSIZE in physical units 
e@ [31:16] = MINRECSIZE in physical units 
e [15:16] = MAXRECSIZE in physical units 


(See MASK Bit [14:01] later in this table for a definition of physical 
units.) 


continued 
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Table 4-1. File Information (cont.) 


MASK Bit Fixed Information Returned 


[03:01] File attribute SAVEFACTOR. 


[04:01] Size (in words) of the disk file header that is returned if MASK bit 8 
is turned on. 


[05:01] ROWSIZE of each disk area (in segments). 
[06:01] Bit [00:01] = File attribute IAD. 
Bit [01:01] = File attribute CRUNCHED. 
Bit [02:01] = File has a guardfile. 
Bit [04:01] = Files in resident program code file. 
Bit [05:01] = File has been subjected to an SL system command. 
Bit [06:01] = File is a system file. 
Bit [07:01] = File is a temporary file. 


[07:01] Number of rows allocated. A row is allocated if disk space is 
assigned to it. The number of allocated rows might be less than the 
number of rows reserved for the file (compare with MASK bit 10). 


[08:01] Link to an image of the disk file header of the file. Refer to the I/O 


Subsystem Programming Guide for the layout of the header. 
Be sure to note the warnings that accompany the description of the 
layout. Because the layout of the header is likely to change over 
time, Unisys recommends, in general, that you use this MASK bit 
only if it is necessary to obtain information from a header that 
cannot be obtained by setting other MASK bits. 


[09:01] Bit [01:02] = 1. This is a file. 
Bit [01:02] = 2. This is a directory. 
Bit [01:02] = 3. This is both a file and a directory. 
Bit [02:01] = 1. The disk file header for the file is available. 


Bit [03:01] = 1. The information is for a tape file (cataloged file on 
the TAPE family) 


Bit [04:01] = 1. The information is for a file on an offline disk 
family. 


[10:01] Number of rows available —that is, file attribute AREAS. 


(11:01) End-of-file (in segments), exclusive of a possible partial final 
segment. 


[12:01] End-of-file uses this number of bits in the last segment. This final 
segment is not counted in the word requested by MASK Bit 11. 


continued 
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Table 4-1. File Information (cont.) 


MASK Bit Fixed Information Returned 


[13:01] SECURITYTYPE file attribute in field [19:20] through the following 
mapping: CASE (X.[19:20]) OF (1,2,3,0). 


SECURITYUSE file attribute in field [39:20] through the following 
mapping: CASE (X.[39:20]) OF (3,1,2,0). 


- This MASK bit is being replaced by bits [18:01] and [24:01]. It will 
be deimplemented in a subsequent release. Turning this bit on in 
the Mark 3.9 release causes the system to issue a run time warning. 


[14:01] 


For the Mark 3.9 release, this bit contains the file information block 
word TANKDATAI that consists of the following: 


e [42:03] = EXTMODE file attribute (see the note that follows) 
e [39:01] = UNITS file attribute 
e [38:04] = FILETYPE file attribute 

e [34:03] = SIZEMODE file attribute 
e@ [31:16] = SIZEOFFSET file attribute 
e [15:16] = SIZE2 file attribute 


The physical units of BLOCKSIZE, MAXRECSIZE, and MINRECSIZE 
are determined by the attribute UNITS in [39:01] of the above word. 


Note: In the Mark 3.9 release, if the actual value of 
EXTMODE exceeds the value of ASCII (5), 
GETSTATUS returns the value of ASCII in this 
field. GETSTATUS returns the actual value of 
EXTMODE in field [15:16] associated with 
MASK bit [18:01]. 


[15:01] USEDATE file attribute (access date). 


[16:01] Special link to catalog information. The VALUEF field [38:06] = 1 if 
the resident file is cataloged. The LINKF field contains the word 

index of the validity mask for the catalog information. Refer to 

Table 4—2 for details. 


Link to guardfile TITLE (in standard form). 


{17:01] 


continued 


4-12 . 8600 0346-000 


GETSTATUS Request Type 3 (Directory Calls) 


Table 4—1. File Information (cont.) 


MASK Bit Fixed Information Returned 


[18:01] The values of BLOCKSIZE, MINRECSIZE, and MAXRECSIZE are 
expressed in FRAMESIZE units. 


e [47:01] = UNITS file attribute. 


e [46:01] = 1. The CCSVERSION file attribute has been turned 
on. 


e [43:04] = FILETYPE file attribute. 
e [39:16] = CCSVERSION file attribute if bits [46:01] = 1. 
e [23:08] = Value of FRAMESIZE for the file. 
_@ [15:16] = EXTMODE file attribute. 
[19:01] File attribute VERSION. 
[20:01] File attribute CYCLE. 


(21:01) File TIMESTAMP. The format of the value is the same as that of the 
value returned by the ALGOL TIME(6) intrinsic function. 


{22:01] Number of segments allocated, computed with regard to the value 
of the file attribute CRUNCHED. 


[23:01] = is an APL file; the MA system command has been performed on 
it. 
Size information for BLOCKSIZE = VARIABLEOFFSET for files. 
e [47:16] = SIZEMODE file attribute 
e [31:16] = SIZEOFFSET file attribute 
e [15:16] = SIZE2 file attribute 
USETIME file attribute. 
USERINFO file attribute. 
ALTERDATE file attribute. 
[28:01] ALTERTIME file attribute. 
[29:01] CREATIONTIME file attribute 
[30:01] Unit number of the base pack of the family. 


[24:01] 


[25:01] 
(26:01] 
{27:01] 


[31:01] Link to an image of segment 0 of a code file. 


Note: The segment 0 information is intended for use by 
system software. Unisys maintains the right to 
change the contents of segment 0 from release to 

release. 


continued 
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Table 4-1. File Information (cont.) 


MASK Bit Fixed Information Returned 


[32:01] Link to the list of deimplementation message numbers. The list 
consists of 16-bit binary numbers, with the last number being 0. 


[33:01] Link to an image of the row address (mass-address) words. The first 
word pointed to gives the total number of row address words (zero 
or more). Subsequent words contain the row address words 
beginning with row address word zero. Bit 43 of each row address 
word can be interrogated to determine if space has been allocated 
for the row. The format of each row address word is as follows: 


e [47:01] = 1 if the DMSII read lock flag is turned on for the row. 


e [46:01] = 1 if the DMSII write lock flag is turned on for the 
row. 


[45:01] = 1 if the row is on a unit that is not write-enabled. 


[44:01] = 1 if the family member on which the row was 
allocated has been deleted from the family by an operator RC 
(Reconfigure Disk) system command. 


[43:01] = 1 if space has been allocated for the row. 


[42:01] = 1 if the family index field was explicitly set 
requesting that space for the row be allocated on a specific 
family member. 


[41:08] = The family index of the family member on which the 
row is or will be allocated (family indexes count from one). 


[33:01] = 1 if the row is allocated and the family member on 
which it is allocated is online. In the row address words 
returned by this request, this bit is always 0. 


[32:33] = If the row is allocated, this field contains the actual 
disk address of the first segment of the row. 


[34:01] FILEORGANIZATION file attribute. 
(35:01) Link to the NOTE file attribute. 
[36:01] Bit 1 is turned on if the file is restricted. 


Bit 2 is turned on if the base disk volume is restricted. 
Bit 3 is turned on if the base disk unit is restricted. 
Bit 4 is turned on if the disk family is restricted. 


Bit 5 is turned on if the file is a read only file, such as a system log 
file. 


[37:01] Link to the license key information. 


[38:01] Link to the RELEASEID attribute. 


continued 
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Table 4-1. File Information (cont.) 


MASK Bit Fixed Information Returned 


[39:01] : Link to the list of user defined disk file attributes. Refer to the 
description of the header layout in the J/O Subsystem 
Programming Guide. 


(40:01) Bits [47:01] = 1 if the BLOCKSTRUCTURE file attribute is valid. 
Bits [46:07] = Reserved. 


Bits [39:20] = The number of bytes between the end of an 
uncrunched area and the end of the sector in which the area ends. 
Bits [19:08] = BLOCKSTRUCTURE file attribute. 


If the file was created on an operating system that does not support 
the FILESTRUCTURE attribute (Mark 3.8 and earlier releases), bits 
{11:12] = 0. 


If the file was created on an operating system that supports the 
FILESTRUCTURE attribute, the following is applicable: 


e Bits [11:04] = 1 if the file was created with direct I/O. 


e Bits [11:04] = 2 if the file was not created with direct 1/O and 
a value of FILESTRUCTURE was not explicitly designated when 
/ the file was created. 


Bits [11:04] = 3 if the file was not created with direct I/O and 
a value of FILESTRUCTURE was explicitly designated when the 
file was created. 


- @ Bits [07:08] = FILESTRUCTURE attribute. 
(41:01] FILELENGTH file attribute. 
[42:01] Link to KEYEDIO information. 


[43:01] Link to a word list containing the privilege bits of the designated 
code file, as found in the disk file header. The first word corresponds 
to the special handling bits. The remaining words are the security 
bits. The special handling bits are turned on by the system 
commands CP, SUPPRESS, LP, and RP. The security bits are 
turned on by the system command PP. Refer to the J/O 
Subsystem Programming Guide for the layout of the bits. 


[44:01] DOCUMENTTYPE and PERMITTEDACTIONS file attributes: 
e [47:08] = The DOCUMENTTYPE attribute. 


[39:01] = The DOCUMENTTYPE validity flag, if TRUE, 
indicates that the DOCUMENTTYPE has been set for the file. 


2 e [10:11] = The PERMITTEDACTIONS file attribute. 
(45:01) Reserved. 


continued 
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4-16 


Table 4-1. File Information (cont.) 


MASK Bit Fixed Information Returned 


(46:01] Link to a list of mix numbers of users who have the file open. 


(47:01) Special link to archive information. The LINKF field contains the 
word index of the validity mask for the archive information. Refer to 
Tables 4-4 and 4—5 for details. 


Table 4~—2 contains the catalog information corresponding to MASK bit 16 (the link to 
catalog information). If X points to the beginning of the fixed info link words, then Y is 
given by the following formula: 


| 
Y := ARY[X+17] .LINKF; 


This value points to the catalog information. For SUBTYPE 0 requests, you can limit the 
catalog information on a file-by-file basis by using ADDLWORD(1) as a selection mask. 


Table 4-2. Format of Returned Catalog Information 


Word Contents 


ARY[Y+0] The validity mask. The bits that are turned on in this word indicate 
the words in the catalog information that are valid. Bit 0 
corresponds to the first word of catalog information (catalog block 
number), bit 1 corresponds to the second word (serial number), and 
so on. 


ARY{[Y+1] ~The block number of the catalog record for the file in the system 
catalog file. 


ARY[Y+2] The serial number of the disk family or tape volume that contains 


this file. 
ARYL[Y+3] The number of file entries or generations under the catalog block. 
ARY[Y+4] A special link to the file or generations: 


e LINKF contains an absolute word index to the first file 
generation reported. 


INFOF contains the number of file generations that are present. 


MAXCATLEVELF of SUBCLASS controls the number of file 
entries returned. 


e ADDLINFOF contains the size of each entry in words. 


For details, refer to Table 4~3. 
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Table 4-3 contains the catalog information referenced in ARY[Y +4]. Each referenced 
file entry is structured according to the values in Table 4-3, where Z is the index of the 
first word of the file entry. The index of the first file entry is as follows: 


Z := ARY[Y+4].LINKF; 


Table 4—3. Format of File Generations Returned 


Word Contents 


ARY[{Z+0] The validity mask. The bits that are turned on in this word indicate 
the words in the file generation information that are valid. Bit O 
corresponds to the first word of the generation information (number. 
of reels), bit 1 corresponds to the second file entry (resident 

indicator), and so on. 


Number of reels associated with this file (for tape files only). 


ARY[Z+ 1] 
ARY[Z+2] 


Resident indicator. The value is 1 if this generation is for the 
resident disk file. The value is 0 if this file generation is for a tape 
file or a nonresident generation of a disk file. 


ARY[Z+3] Version and cycle of this generation. 


ARY[Z+ 4] For disk files, the FILEKIND attribute. For tape files, the content is 
192. 


Link to the backup list. ARY[Z+5].LINKF is a character index that 
points to one or two backup entries. ARY[Z+5].INFOF contains the 
total number of characters pointed to as follows: 


ARY{Z+5] 


4"9391" <kind> 4"9892" <serial number> 


Each backup entry is 11 bytes long. The variable <kind> is the 
KIND value of the unit on which the backup appears and is a 1-byte 
binary number. The variable <serial number> is the SERIALNO 
value of the volume on which the backup appears and is 6 EBCDIC 
characters long. 


TIMESTAMP attribute for this entry. The format returned is the same 
as for the ALGOL TIME (6) intrinsic. 


ARY[Z+6] 


ARY[Z+7] 
ARY{Z+8] Reserved. 
ARY[Z+9] 


Reserved. 


For tape files, the last access date and time of access. The format 
returned is the same as for the ALGOL TIME (6) intrinsic. 


Table 4—4 contains the archive information that corresponds to MASK bit 47, the link to 
archive information. If X points to the beginning of the fixed info link words, then R is 
given by the following formula: 


R := ARY [X+48].LINKF; 


This value points to the archive information. 
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Table 44. Format of Returned Archive Information 


Word Contents 


ARY [R+0] The validity mask. The bits that are turned on in this word indicate 
the words in the archive information that are valid. Bit 0 
corresponds to the first word of archive information (timestamp), bit 
1 corresponds to the second word (link to backup information), and 
so on. 


ARY [R+1] The date and time when the archive record for this file was last 
updated (or when the record was initially entered into the archive 
- directory). The format returned is the same as for the ALGOL 


TIME (6) intrinsic. 


- ARY{(R+2] Special link to archive backup information for the file: 


e —_LINKF contains an absolute word index to the archive backup 
information. 


e@ INFOF contains the number of sets of backups returned. 


e ADDLINFO contains the size in words of each backup set. 


For details, refer to Table 4—5. 


Table 4—5 contains the archive backup information referenced in ARY [R+ 2]. The 
archive backup information gives a description of some of the file attributes of the 
named file at the time when the file was backed up or rolled out with a WFL ARCHIVE 
statement. The currently resident file, if any, might actually be a different file with 
completely different file attribute values, but it can still have the same name as the 
backed up file. The archive backup information also describes the tape media to which 
the backup was made. Archive backup information is structured according to the values 
in Table 4—5, where G is the index of the first word in the entry. The index G of the 
backup information can be calculated with the following formula: 


G := ARY [R+2] .LINKF; 


Note that an archive record can contain references to one or two tape backups. In 

Table 4—5, the references to backups come in sets of 4 words, such and 9, 10, 11 and 12 
or 13, 14, 15, and 16. The first word of each set corresponds to one backup. The second 
word of each set corresponds to the another backup, and so on. The backup entries are 
not ordered in the record. Any of the four backups can be missing. When all four are 
present, the most recent backup can be in the first, second, third, or fourth slot. You can 
use the date and time that appear in words 17 through 20 to determine which backup is 
most recent. 
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Table 4—5. Format of Archive Backup Information 


ARY [G+0] The validity mask. The bits that are turned on in this word indicate 
the words in the archive backup information that are valid. Bit 0 
corresponds to the first word of archive backup information 
(FILEKIND and security), bit 1 corresponds to the second word 
(SAVEFACTOR and organization), and so on. 


ARY [G+1] Bits [47:01] contain the FILEKIND value. 
Bits [35:08] contain an internal code for SECURITYTYPE as follows: 
e 0 = PUBLIC 
e 1 = GUARDED 
e 2 = CONTROLLED 
@e 3 = PRIVATE 
Bits [27:08] contain an internal code for SECURITYUSE as follows: 
e 0=10 
e 1=IN 
e 2=OUT 
e 3 = SECURED 
ARY [G+2] Bits [47:08] contain the FILEORGANIZATION. 
Bits [19:20] contain the SAVEFACTOR. 


ARY [G+3] TIMESTAMP attribute for the backed up file. The format returned is 
the same as for the ALGOL TIME (6) intrinsic. 


ARY [G+4] if CYCLE (and VERSION) were designated for the file, bits [21:14] 
contain CYCLE and bits [07:08] contain VERSION. 


ARY [G+5] REAL number (in floating point form): file size in megabytes. 


ARY [G+6] . File creation date and time. The format returned is the same as for 
the ALGOL TIME (6) intrinsic. 


ARY [G+7] Last access date and time. The format returned is the same as for 
the ALGOL TIME (6) intrinsic. 


ARY [G+8] Equal to 1 if the backed up file does not match the residential file. 
Equal to 0 if no resident file exists or if the resident and backed up 
versions of the file do match. 


ARY [G+9] Bits [47:08] contain the tape reel number on which one backup 
copy of this file starts. 


continued 
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4-20 


ARY [G+10] 
ARY [G+11]} 
ARY [G+12] 
ARY [G+13] 
ARY [G+14] 
ARY [G+15] 
ARY [G+16] 
ARY [G+17] 


ARY [G+18] 
ARY [G+19] 
ARY [G+20] 
ARY [G+21] 


ARY [G+22] 
ARY [G+23] 
ARY [G+24] 


Table 4—5. Format of Archive Backup Information (cont.) 


Bits [37:06] contain a code for the type of ARCHIVE backup: 


@e 0 = EMPTY (The backup slot is available for the next ARCHIVE 
backup or merge entry for the file.) 


1 = FULL 
2 = DIFFERENTIAL 
3 = INCREMENTAL 
e 4= ROLLOUT 
e 32 = MERGE 


Bit [31:01] is on if the backup tape has been overwritten. Each 
backup description has the TYPE, tape name, date and time of 
creation, and serial number list. 


Has the same format as ARY [G+9] for another backup. 
Has the same format as ARY [G+9] for another backup. 
Has the same format as ARY [G+9] for another backup. 
Link to the backup tape name in substandard form. 

Link to another backup tape name in substandard form. 
Link to another backup tape name in substandard form. 
link to another backup tape name in substandard form. 


Date and time when the archive process started. For installations 
that use the volume directory facility (such as the system command 
SECOPT TAPECHECK =AUTOMATIC, this value matches 
the value stored in word 15 of the volume directory record for the 
backup tape. The format returned is the same as for the ALGOL 
TIME (6) intrinsic. 


Same format as ARY [G+17] for another backup tape. 
Same format as ARY [G+17] for another backup tape. 
Same format as ARY [G+17] for another backup tape. 


Link to the tape SERIALNO list used for the backup file. Each 
SERIALNO in the list is 6 EBCDIC characters long. 


Same format as ARY [G+21] for another backup tape. 
Same format as ARY [G+21] for another backup tape. 
Same format as ARY [G+21] for another backup tape. 
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SUBTYPE O Calls (Searching for a Specific File) 


SUBTYPE 0 can be used to retrieve status and attribute information about one or more 
disk files or cataloged tape files. For SUBTYPE 0 calls, be aware of the following: 


e The SUBCLASS.MAXCATLEVELF parameter can be used to limit the number of 
cataloged file generations reported (refer to Table 4—3). 


e You can use the MASK parameter to select the file attributes or status items that 
are to be reported (refer to Table 4-1). 


e The array ARY must contain the names of the files. ARY can optionally contain 
dynamic MASK and SUBCLASS values. These dynamic values can be used as 
substitutes for the SUBCLASS and MASK parameters. Such a technique permits 
the caller to retrieve different attributes for different files with a single call. ARY 
can optionally contain an ADDLWORD for one or more of the file pointer words. For 
each file pointer word, ADDLWORD(1) supplies a mask to limit the specific catalog 
information retrieved (refer to Table 4-2); if ADDLWORD(1) is not present, all 
available catalog information is retrieved. 


Input for SUBTYPE 0 Calls 


Figure 4—2 shows a diagram of input with subtype 0 for the array ARY. 


ARY [9] a eer for 
Varible ; 
Optional Information 
MASKs 
Reserved for 
i i Fixed 
File Pointer Words tntornstion 


Fi le Name's 
Figure 4-2. Input Diagram for SUBTYPE 0 Calls 


For SUBTYPE 0 calls, the information in the array ARY should be structured as 
described in the following text. 
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ARY[0] 
This word contains two numbers: 


© ARY(0].[19:20] 


This field contains the count of the total number of file pointer words and 
- ADDLWORD words plus 1. If ADDLWORD words are not used, ARY[0].[19:20] 
contains the number of file pointer words plus 1. 


e ARY[0].[39:20] 


This field contains a count of the number of dynamic MASK and SUBCLASS words 
present plus 1. ARY[0].[39:20] should be 0 or 1 if dynamic MASK and SUBCLASS 
words are present; otherwise, it should be an odd number (an even number plus 1 
because each reference requires a pair of words). 


Optional MASK and SUBCLASS Values 


These words contain optional dynamic MASK and SUBCLASS values. The number of 
words occupied by these values must be indicated by the value in ARY[0].[89:20]. 


File Pointer Words 


The file pointer words and optional ADDLWORDs immediately follow the last dynamic 
MASK and SUBCLASS pair. If no dynamic MASK words exist, the first file pointer 
word must be in ARY [1]. Each file pointer word must be structured with the LINKF, 
VALUEF, and ADDLINFOF fields. In the following description, suppose that the file 
pointer word (FPW) is the next file pointer word in ARY. 


FPW.LINKF must contain the character offset to the start of the file name. 
GETSTATUS locates the first byte of the file name for a given file pointer word with the 
following formula: 


character index = ARY[@].[19:20] * 6 + FPW.LINKF 


FPW.VALUEF indicates whether or not an optional ADDLWORD(1) follows the file 
pointer word. If FPW.VALUEF contains a 0, all catalog information is returned for the 
file if MASK bit 16 is turned on (refer to Table 4-2). If FPW.VALUEF contains a 1, an 
ADDLWORD(1) is in the next word of ARY. That word is used as a mask to limit the 
catalog information returned. | 


FPW.ADDLINFOF indicates the optional dynamic MASK and SUBCLASS pairs that are 
to be used for the file. If FPW.ADDLINFOF is 0, the value of MASK and SUBCLASS 

is not changed. If ARY[0].[39:20] is greater than 1 and FPW.ADDLINFOF is not 0, the 
MASK and SUBCLASS are changed as follows: | 


MASK := ARY [FPW.ADDLINFOF] ; 
SUBCLASS := ARY [FPW.ADDLINFOF + 1]; 
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File Names 


The file names should be placed in the same order as that of the corresponding file 
pointer words, immediately after the last file pointer word. 


Fixed Information 


GETSTATUS uses these reserved words to return simple file attributes and links to 
variable-length file attributes. GETSTATUS places the fixed information for all files, 
beginning in the word immediately after the first file name. The number of words 
required per file name depends on the MASK parameter and the amount of requested 
catalog information. For example, if the highest bit that is on in the MASK word is 
38, then 39 words will be required for each file plus the words for catalog information. 
Catalog information for each file might require an additional 5 + 10 = 15 words (refer to 
Table 4-2 and Table 4-3). 


Variable Information 


GETSTATUS uses these reserved words to return variable-length file attributes. 
Sufficient space must be left at the end of the array ARY so that GETSTATUS can 
store variable-length information. For example, depending on the MASK parameter, 
GETSTATUS places guardfile names, row address words, catalog backup lists, and so on 
at the end of the array ARY. 


Results Returned for SUBTYPE 0 


If bit 0 of the Boolean result returned by GETSTATUS B equals 1,one of the following 
types of errors has occurred: 


e B[11:08] is not 0. GETSTATUS detected a hard error. Refer to Appendix A for a 
listing of hard errors. 


e IfB.(11:08] equals 0, a pointer word (other than ARY[0].[19:20]) within the array 
contains the ERRORF bit set, and subsequent investigation of the ERRORVALUE 
field provides the soft error number. Refer to Appendix B for a listing of soft errors. 


e For example, if the first file is not present and ARY [0].[39:20] equals 0, 
ARY[1].ERRORF contains a 1 and ARY[1]. ERRORVALUEF contains a 49 
(NOFILE). 


If all the file pointer words are processed, ARY [0].[19:20] is left unchanged. If 
processing stops because ARY does not have enough room for all the requested 
information for all the files, bit 47 of ARY [0] is turned on and ARY [0].[19:20] is made 
equal to the index of the file pointer word where processing stopped. The information 
for that file was not completed and should not be used. 


GETSTATUS searches for each of the files referenced by file pointer words. 


GETSTATUS replaces each file pointer word processed with either a soft error word or 
a fixed info link word. 
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SUBTYPE 0 Examples 


The following SUBTYPE 0 examples depend on these declarations: 


DEFINE DISPLAYFORMNAMEF = [39:1] #, 
RETURNRESIDENTF = [37:1] #, 


ERRORF = [47:1] #, 

ADDLINFOF = [46:8] #, 

VALUEF = [38:6] #, 

LINKF = [32:17] #, 

INFOF = [15:16] #; 
REAL FILW, GLW; % FIXED INFO LINK WORD, GENERATION LINK WORD 
REAL J, X, Y, Z, LEN, TIMESTAMP; 
BOOLEAN B; 


ARRAY ARY [8:4880] ; 
This example shows how to retrieve all the information available about a file: 


ARY [@] := 2; WORD INDEX OF FIRST FILE NAME 
ARY [1] := 8; - FILE POINTER WORD 
REPLACE POINTER (ARY [2]) BY 6 FILE NAME 
"SYSTEM/DCALGOL ON SYS37."; 
B := GETSTATUS (3 & 1 DISPLAYFORMNAMEF, @, REAL (NOT FALSE), ARY); 


we oe oe 


After GETSTATUS has been called, the results are available in B and ARY. 


The example code that follows shows how to retrieve the TIMESTAMP entry for each 
generation of the cataloged file. The catalog generation TIMESTAMP attribute was 
chosen for the example because it illustrates how to code several layers of error checking 
and linking. Most file attributes are easier to access because they are available at the 
first level and do not require multiple links. To locate the TIMESTAMP entry for each 
generation of the file, proceed as follows. In Table 4-1, observe that bit 16 (word 17) 
links to the catalog information. In Table 4—2, observe that bit 3 (word 4) links from 

the catalog information to the generation information. In Table 4—3, observe that bit 5 
(word 6) contains the TIMESTAMP. 
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IF NOT B OR REAL (B.[11:8]) = ® THEN % GETSTATUS CALL WAS SUCCESSFUL 
BEGIN 
FILW := ARY [1]; % PICK UP "FIXED INFO LINK WORD" 
X := FILW.LINKF; 
IF NOT BOOLEAN (FILW).ERRORF THEN % FILE ENTRY WAS FOUND 
IF BOOLEAN (ARY [X].[16:1]) THEN % CATALOG INFO IS THERE 
BEGIN ; 
Y := ARY [FILW.LINKF+17].LINKF; % PICK UP CATALOG LINK 
IF BOOLEAN (ARY [Y].[3:1]) THEN % GENERATION INFO OK 
BEGIN 


GLW := ARY [Y + 4]; % GET LINK TO GENERATION INFO 
Z := GLW.LINKF; % INDEX OF FIRST GENERATION 
LEN := GLW.ADDLINFOF; % SIZE OF EACH GENERATION 
THRU GLW.INFOF DO % LOOP OVER ALL GENERATIONS 
IF BOOLEAN (ARY [Z].[5:1]) THEN % GOOD TIMESTAMP 
BEGIN 


TIMESTAMP := ARY [Z+6];  % GET TIMESTAMP 
% % % % % % % % PROCESS TIMESTAMP OF THAT GENERATION AS NECESSARY 


Z := Z + LEN; % NEXT GENERATION 
END; 
END; % OF "IF GENERATION OK ..." 
END; % OF “IF CATALOG INFO OK..." 
END; % OF “IF GETSTATUS CALL OK..." 


The next example illustrates how to retrieve information for three specific files with a 
single GETSTATUS call. This example also illustrates how to use dynamic MASK and 
SUBCLASS values in SUBTYPE 0 calls and how to use ADDLINFO(1) to pence 
limit the catalog information to be retrieved. 


Suppose that the three files are SYSTEM/SUMLOG ON DISK, (X)DATAFILE ON 
PACK, and SYSTEM/ALGOL ON SYS37. Suppose that you want to determine 
the file size (in segments) of the SUMLOG, the number of catalog generations 

for (X)DATAFILE, and the creation date of ALGOL. From Table 4-1, observe 

that MASK bit 22 corresponds to file size and bit 1 corresponds to creation date. 
To get catalog generations, MASK bit 16 selects catalog information, and from 
Table 4-2, ADDLWORD(1) bit 3 selects the count of generations. Turn on the 
RETURNRESIDENTF bit of the TYPE parameter because to get a count of the 
generation of (X)DATAFILE even if a resident generation does not exist. 
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ARY [@] := 9 % LAST FILE POINTER WORD IS IN ARY [9-1] 
% TWO PAIRS OF DYNAMIC "MASK" & "SUBCLASS" 
& 5 [39:28]; % PRECEDE FIRST FILE POINTER IN ARY [5]. 


ARY [1] := @ & 1 [16:1]; % MASK BIT FOR CATALOG INFO 


ARY [2] := 9; % DUMMY SUBCLASS VALUE 
ARY [3] := @ & 1 [1:1]; % MASK BIT FOR CREATION DATE 


ARY [4] := 9; % DUMMY SUBCLASS VALUE 


% FILE POINTER WORDS 
ARY [5] := @ & (6 * (18 - 9)) LINKF; % SUMLOG 


ARY [6] := @ & (6 * (20 - 9)) LINKF % (X)DATAFILE 

& 1 ADDLINFOF % LINK TO DYNAMIC "MASK" 

& 1 VALUEF; % REF TO ADDLWORD (1) 
ARY [7] := @&1 [3:1]; % ADDLWORD (1) FOR DATAFILE 
ARY [8] := © & (6 * (38 - 9)) LINKF % SYSTEM/ALGOL 

& 3 ADDLINFOF; % LINK TO DYNAMIC "MASK" 


NOTE -- THERE CAN BE SPACES BETWEEN THE FILENAMES AND THERE CAN BE 
SPACE BETWEEN THE LAST FILE POINTER WORD 
AND THE FIRST NAME. 

REPLACE POINTER (ARY [10]) BY “SYSTEM/SUMLOG."; 

REPLACE POINTER (ARY [2@]) BY "(X)DATAFILE ON PACK."; 

REPLACE POINTER (ARY [38]) BY "SYSTEM/ALGOL ON SYS37."; 


Og oe 


oe 


B := GETSTATUS (3 & 1 DISPLAYFORMNAMEF & 1 RETURNRESIDENTF, 
6, @& 1 [22:1], ARY); 


For additional examples of SUBTYPE 0 calls, refer to “Hypothetical Examples for File 
and Directory Searches” in this section. 


SUBTYPE 1, 2, and 4 Calls (Searching for Files 
under a Given Directory) 


SUBTYPEs 1, 2, and 4 return information about files and directories. The caller 
indicates the files and directories that are to be reported by designating one 

major directory name and family name under which GETSTATUS should search. 
GETSTATUS returns file status words for directories that are found twice under 

the specified directory. GETSTATUS also returns file status words and other file 
information (as selected by the MASK parameter) for files that are found twice under 
the specified directory, and file status words and other file information for nodes found 
that are both directories and file names. Each file status word that is returned indicates 
the name and level of the node and whether it describes a directory, a file, or a file and a 
directory. 
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Request Format for SUBTYPE 1, 2, and 4 Calls 


You can designate that the directory to be searched in one of four different ways: 


e Searching a specifically named subdirectory 

e Searching the entire usercode directory 

e Searching the entire system directory 

e Searching both the entire usercode directory and the entire system directory 


If you want to search a specifically named subdirectory, you can designate the name of 
the directory in either display form (see TYPE.DISPLAYFORMF) or standard form. 


You can also designate that the entire usercode directory (containing all files under 
usercodes), the entire system directory (containing all files without usercodes and 
directory), or both be searched. In these cases, the input directory name is special and 
must be in standard form. For information about standard form, refer to information 
on the DISPLAYTOSTANDARD function in the DCALGOL Reference Manual. The 
usercode information field of the <qualification> variable in the standard-form name 


should be as follows: 

Variable Description 

3 Searches all usercode directories. A process that is not privileged 
and was not started from an ODT will receive a “NO FILE” soft error 
for this request. 

2 7 Searches the nonusercode directory, and, depending on the 
privileges of the process, all usercode directories. If the process is 
not privileged and was not started from an ODT, only the directory 
for nonusercoded files is reported. Otherwise, if the process is 
privileged or was started from an ODT, all files (usercoded and 
nonusercoded) are reported. 

1 _ Searches the usercode directory, nonusercode directory or both. A 


process that is not running under a usercode, is not privileged, and 
was not started from an ODT gets only files from the nonusercode 
directory. A process that is not running under a usercode but is 
privileged or was started from an ODT gets files from both the 
usercode and nonusercode directories. A process that is running 
under a usercode gets files from under the process usercode 
directory if any exists. If no files exist under the process usercode 
directory, files from the nonusercode directory are reported. 


These three standard form directory names are respectively 48"030300", 48"030200", and 
48"030100". : 


If the family name is also specified, the <total length> variable in the standard form 
name should be increased, bit [2:01] of the <qualification> byte should be turned on, 
the <number of identifiers> should be 1, and the <ID length> and <identifiers> for 
the family name should be appended to the code for the directory. 
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¢ 


For example, in order to search the nonusercode directory on PACK, the standard form 
name would be the following: 


48"98060194" 8" PACK" 


input Array ARY Requirements for SUBTYPE 1, 2, and 4 Calls 


Figure 4—3 shows a diagram of input for SUBTYPEs 1, 2, and 4 of the array ARY. 


ARY [8] | ees for 
Xv. Varible 

ARY [1] , Information 

Reserved for 


4 
Result Words Fixed 


Information 
Reserved Link Word 


Directory Name 


Figure 4-3. Input Diagram for SUBTYPE 1, 2, and 4 Calls 


For SUBTYPE 1, 2, and 4 calls, the caller should structure the array ARY as follows: 


ARY[0] 


ARY[0].[19:20] should contain the number plus 2 of files, directories, or both to be 
reported. ; 


ARY[1] 


ARY[1].LINKF should contain the character offset to the name of the directory to be 
searched. GETSTATUS locates the start of the directory name as follows: 


POINTER (ARY) + (ARY [@].[19:20] *6 + ARY [1].LINKF) 


Normally, ARY [1].LINKF should be 6 so that one word is reserved for the family link 
that is to be placed after the result words. 
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Result Words 


These words are reserved so that GETSTATUS can place file status words, fixed info 
link words, or both for the files and directories found by GETSTATUS. The number of 
result words reserved is given by ARY[0].[19:20]-2. 


Reserved Link Word 


GETSTATUS returns the family name of the family that was searched. The word 
immediately after the last word reserved for result words is used by GETSTATUS to 
return a link to the family name used. 


If a word is not reserved for this link, then after GETSTATUS picks up the directory | 
name, GETSTATUS overwrites the first word of the name with the link to the family 
name. 


Directory Name 


The name of the directory to be searched is located, as previously described under the 
explanation of ARY[1]. 


Fixed Information 


These reserved words are used by GETSTATUS to return simple file attributes and 
links to variable-length file attributes. GETSTATUS places the fixed information for all 
files beginning in the word immediately after the first directory name. The number of 
words required per directory name depends on the MASK parameter and the amount 
of catalog information requested. For example, if the highest bit that is on in the 
MASK word is 38, then 39 words are required for each file plus the words for catalog 
information. Catalog information for each file might require an additional 5 + 10 = 15 
words (refer to Table 4—2 and Table 4-3). 


Variable Information 


These reserved words are used by GETSTATUS to return variable-length file attributes. 
Sufficient space must be left at the end of the array ARY so that GETSTATUS can store 
variable-length information. For example, GETSTATUS uses these words to return the 
family name and file names. Also, depending on the MASK parameter, GETSTATUS 
places guardfile names, row address words, catalog backup lists, and so on at the end of 
the array ARY. 


Results Returned for SUBTYPE 1, 2, and 4 Calls 


If the GETSTATUS call returns a Boolean 0, no errors were detected in the input 
parameters, and no file errors are reported in the array. If bit 0 of the Boolean result 
returned is turned on, either a hard error or a soft error was detected. If bits [11:08] of 
the Boolean result are not all 0, a hard error was detected, and any information returned 
in the array should not be relied upon. 
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When no hard errors are detected, GETSTATUS stores special information in ARY[0], 
as follows: 


e Bit ARY[0].[47:01] is turned on if there were not enough reserved words in the array — 


for GETSTATUS to return information about all the directories and files under the 
requested directory. Use a continuation request to retrieve information for the 
remaining files. 


e ARY [0].[19:20] contains the value of the index plus 1 of the last result word 
returned. 


GETSTATUS stores special information in ARY[1]. If an error such as “NO FILE” is 
detected on the initial name, ARY[1].ERRORF equals 1, and ARY[{1]. FRRORVALUEF 
indicates the type of soft error that occurred. Refer to Appendix B for a list of soft 
errors. Otherwise, GETSTATUS stores the following information in ARY[1]: 


e ARY{1].[43:11] contains a word index that points to a link word. LINKF of that 
word is a character index that points to the family name stored as a simple form 
name. GETSTATUS returns the name of the actual family used (after family 
substitution). 


e IfTYPE.RETURNFULLNAMEF equals 0, ARY[1].NEXTLEVELLINKF 
(ARY[1].[15:11]) points to a file status word for the first node of the last complete file | 
name. The last node in the list contains a NEXTLEVELLINKF field value of 0. 


e ARY{[1].LINKF is controlled through TYPE.RETURNFULLNAMEF as follows: 


—- IfTYPE.RETURNFULLNAMEF equals 0, LINKF is not altered from the 
original input call. 


- IfTYPE.RETURNFULLNAMEF equals 1, LINKF points to the last file name 
for which the requested information was completely returned. 


e ARY[1].LEVELF contains the number of levels that were present in the original 
directory name. To make a continuation call (SUBTYPEs 2 and 4), you should 
retrieve this number and pass it in the SUBCLASS.ORGLEVELF parameter. 


GETSTATUS stores either one soft error word, one file status word, or one fixed info 
link word into the array ARY for each file or directory that is located. These words 
are placed in the area reserved for result words in the array ARY, starting at ARY[2]. 
GETSTATUS stores a number in ARY[0].[19:20] that is one greater than the index of 
the last soft error word, file status word, or fixed info link word returned. 


GETSTATUS places file status words in the reserved area for each directory located. 
GETSTATUS also places file status words in the reserved area for each file located if the 
MASK parameter does not have any bits turned on other than bit 0. If other MASK bits 
are on, GETSTATUS stores fixed info link words in the reserved area for each file that is 
located. 
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SUBTYPE 2 and 4 Calls (Continuation of a Directory Search) 


Because the array ARY must have a practical length, the GETSTATUS call might not 
have enough array space to provide all the names (with or without additional MASK 
information) that are present in a specified directory. After a call where SUBTYPE 
equals 1, 2, or 4, GETSTATUS turns on bit ARY[0].[47:01] if one of the following occurs: 


e Not enough result words were reserved to report all the files and directories present. 
That is, the value supplied in ARY[0].[19:20] was not large enough. 


e Not enough words were reserved at the end of the array ARY for GETSTATUS to 
place all the information available for the files that were located. 


GETSTATUS does not return an error (bit 0 of the Boolean result returned is turned 
off) for these out-of-space conditions. 


If there are not enough reserved words in the array for GETSTATUS to return 
complete information for the first file or directory located, hard error 41 is returned. 
Refer to Appendix A for a listing of hard error codes. 


If GETSTATUS does not return a hard error, it returns a value in ARY[0].[19:20] that 
is 1 greater than the last complete result word that was placed in the array. The caller 
can examine and and process those result words and, if bit ARY[0].[47:01] is on, request 
information about the remaining files with a continuation request. By repeatedly issuing 
continuation requests, the caller can eventually retrieve information for all the files in a 
directory. 


The two methods for continuing a GETSTATUS directory search are the following: 


e TYPE.SUBTYPEF = 2 
e TYPE.SUBTYPEF = 4 


SUBTYPE 2 Calls 


A SUBTYPE 2 continuation call is quite similar to an initial SUBTYPE 1 call. However, 
there are two differences: . 


e The SUBCLASS.ORGLEVELF parameter should contain a count of the number 
of levels in the original directory name. The proper value can be retrieved from 
ARY[1].LEVELF after a successful SUBTYPE 1, 2, or 4 directory call. 


e The last file name or directory name reported for the processing directory call should 
be supplied in place of the original directory name. 


For a SUBTYPE 2 call, the TYPE, SUBCLASS, and MASK parameters are 

the same as for a SUBTYPE 1 call, except that TYPE.SUBTYPEF = 2, and 
SUBCLASS.ORGLEVELF must be set up as previously described. Furthermore, as 
with SUBTYPE 1, a count of the number of files or directories to report plus 2 should be 
stored in ARY[0]; ARY[1].LINKF should point to the file or directory name from which 
the continuation search is to proceed. 
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Note: Coding a SUBTYPE 2 call is as easy as coding a SUBTYPE 1 call. 
A SUBTYPE 2 call can be used to start a search in the middle of a 
directory. It is not required that a SUBTYPE 2 call be preceded by 
another SUBTYPE 2 or SUBTYPE 1 call. 


SUBTYPE 4 Calls 


Unlike a SUBTYPE 2 continuation call, a SUBTYPE 4 continuation call requires that the 
result information in the array ARY from the preceding SUBTYPE 1 or SUBTYPE 4 call 
be intact. For SUBTYPE 4, GETSTATUS traverses the array ARY and automatically 
determines the file name to continue searching from. The contents of ARY[0].[19:20] 
should be restored to the count of files to be reported plus two before the SUBTYPE 4 
call is issued. The value of the TYPE parameter passed for the SUBTYPE 4 call must 

be the same as it was in the initial SUBTYPE 1 call, except that the SUBTYPEF field is — 
changed to 4. The array should not be altered between the TYPE.SUBTYPEF = 1 and 
the TYPE.SUBTYPEF = 4 calls, except for reinstating ARY[0].[19:20]. 


SUBTYPE 1, 2, and 4 Examples 


The information that follows contains two kinds of examples: real programming (code) 
examples and hypothetical examples. (Refer to Appendix D for a complete example 

of the GETSTATUS directory interface, including continuation calls and attribute 
gathering.) 


Programming Examples 


4-32 


The following SUBTYPE 1, 2, and 4 examples depend on these declarations: 


DEFINE RETURNFULLNAMEF = [49:1] #, 
DISPLAYFORMNAMEF = [39:1] #, 
ONLYSYSTEMFILESF = [38:1] #, 
RETURNRESIDENTF = [37:1] #, 
SUBTY PEF = [15:8] #, 
ORGLEVELF = [38:19] #, 


MAXLEVELF = [19:20] #, 

ERRORF = [47:1] #, 

ADDLINFOF = [46:8] #, 

VALUEF = [38:6] #, 

LINKF = [32:17] #, 

INFOF = [15:16] #, 

LEVELF = [3:4] #; 
REAL FILW; % FIXED INFO LINK WORD 
REAL J; 
BOOLEAN B; 


ARRAY ARY [@:4988] ; 
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The following example illustrates how to search all files under a directory and how to 
process the results. Initially,a SUBTYPE 1 directory search call is issued, and then 
repeated SUBTYPE 4 continuation directory search calls are made until all files have 
been reported. The example shows a directory search for all files under the directory 
A/=. The information retrieved by GETSTATUS is processed to count the total number 
of files (resident and nonresident) under the directory A/= and to count the total 
number of segments in use by resident files under the directory A/=. 


REAL FILES, SEGS, SUBTYPE; 
LABEL LOOP; 


REPLACE POINTER (ARY [53]) BY % DIRECTORY NAME 
48"95818181" "A"; 

ARY [1] := @ & 6 LINKF; 

SUBTYPE := 1; % FIRST CALL IS SUBTYPE 1 


LOOP: % CONTINUE WITH MORE 
ARY [8] := 52; % ROOM TO REPORT 5@ FILES PER CALL 
RETURNRESIDENTF IS ON SO THAT BOTH RESIDENT AND CATALOGED 


NONRESIDENT FILES WILL BE REPORTED. MASK BIT 22 REQUEST COUNT OF 
SEGMENTS IN USE BY FILE. 


oe of o& 


o 


:= GETSTATUS (3 & SUBTYPE SUBTYPEF & 1 RETURNRESIDENTF, 
: @, © &1 [22:1], ARY); 


IF NOT B OR REAL (B.[11:8]) = @ THEN 
IF NOT BOOLEAN (ARY [1].ERRORF) THEN . 
BEGIN % CALL WAS SUCCESSFUL 


J := ARY [@].[19:28]; % INDEX OF LAST RESULT WORD PLUS 1 
WHILE J:= * - 1 GEQ 2 DO 
IF NOT BOOLEAN (ARY [J].ERRORF) THEN % GOOD RESULT WORD? 
BEGIN 
IF ARY [J].LEVELF = @ THEN % FIXED INFO LINK WORD? 
BEGIN 

FILES := *+1; 

FILW := ARY [J]; 

IF BOOLEAN (ARY [FILW.LINKF]).[22:1] THEN % SEGS OK 

SEGS := * + ARY [FILW.LINKF + 23]; 


END; 
END; % END OF LOOP OVER RESULT WORDS 
IF BOOLEAN (ARY [@].[47:1]) THEN % MORE FILES TO COME 

BEGIN 

SUBTYPE := 4; 

GO LOOP; % CONTINUE WITH NEXT BATCH OF FILES 
END; 

END; 
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_ The following example shows how to search for all files under the usercode directory 
of the process. If there are no files under the usercode directory of the process, files 
under the directory for nonusercoded files are reported instead. If the process is not 
privileged or was started from an ODT, only public nonusercoded files would be returned. 
If the process is not running under a usercode, then either all files (usercoded and 
nonusercoded ) or all nonusercoded files are returned, depending on whether the process _ | 
is privileged or is started from an ODT. 


ARY [@] := 502; % ROOM TO REPORT 500 FILES PER CALL 
ARY [1] := @ & 6 LINKF; 
% QUALIFIER BYTE = 4 +1-= 5: "ON..." + USERCODE, *, or both 
REPLACE POINTER (ARY [5@3]) BY 48"98950104" "PACK"; 
B := GETSTATUS (3 & 1 SUBTYPEF, 8, @, ARY); 


The following example shows how to determine that usercodes that have files on a family 
named PACK. The request will work only if the process is privileged or is started from 
an ODT; otherwise a “NO FILE” soft error would be returned. 


ARY [@] := 582; % ROOM TO REPORT 5@@ FILES PER CALL 
ARY [1] := ® & 6 LINKF; 
% QUALIFIER BYTE OF NAME = 4+ 3 =7: "ON ..." + USERCODED 


REPLACE POINTER (ARY [503]) BY 48 "98870194" "PACK"; 


SUBCLASS .MAXLEVELF IS USED SO THAT JUST FIRST LEVEL 
(USERCODE NAMES) ARE RETRIEVED. 
B := GETSTATUS (3 & 1 SUBTYPEF, @ & 1 MAXLEVELF, @, ARY); 


2 
% 
¢ 

% 


The following example shows how to search for all files under the nonusercoded 
directory on the family named MCPMAST: 


ARY [8] := 582; % ROOM TO REPORT 58@ FILES PER CALL 
ARY [1] := © & 6 LINKF; 


% QUALIFIER BYTE OF NAME = 4+2= 6: "ON..." + * 
REPLACE POINTER (ARY [583]) BY 48"9B@60197" "MCPMAST"; 


% USE TYPE.ONLYSYSTEMFILESF SO THAT USERCODED FILES WON'T BE REPORTED 
% (OTHERWISE, THEY WOULD BE REPORTED IF THE PROCESS IS PRIVILEGED 
% OR WAS STARTED FROM AN ODT). - 
B := GETSTATUS (3 & 1 SUBTYPEF & 1 ONLYSYSTEMFILESF, 

@, @, ARY); 


4-34 8600 0346-000 


GETSTATUS Request Type 3 (Directory Calls) 


The following example shows how to construct a SUBTYPE 2 continuation request 
that will continue searching from SYSTEM/COBOL under the SYSTEM/= directory. 
(Neither SYSTEM/COBOL nor files preceding it in the directory will be reported.) 


ARY [8] : 
ARY [1] : 


5823 % ROOM TO REPORT 508 FILES PER CALL 
@ & 6 LINKF; 


% NAME OF FILE FROM WHICH CONTINUATION IS TO COMMENCE 
REPLACE POINTER (ARY [593]) BY "SYSTEM/COBOL ON DISK."; 
B := GETSTATUS (3 & 2 SUBTYPEF & 1 DISPLAYFORMNAMEF 

& 1 RETURNFULLNAMEF, 
@ & 1 ORGLEVELF, % SYSTEM/= 
@, ARY); 


Hypothetical Examples for File and Directory Searches 


The following examples illustrate the effects of the various parameters on directory 
GETSTATUS calls. Unless otherwise indicated, assume that, for each example, the 
process is running without a usercode and without a family substitution statement. Also 
assume that all bits in the TYPE, SUBCLASS, and MASK parameters are off (except 
that the TYPEF [7:08] field of the TYPE parameter is 3 and the SUBTYPEF [15:08] 
field of the TYPE parameter is as specified in the examples that follow). 


The examples used here are mainly for SUBTYPEs 0 and 1 because SUBTYPEs 2 

and 4 give the same results as SUBTYPE 1. In the examples that follow, the result 

is described as either a soft error word, a file status word, or a fixed info link word. 
Remember that whenever a file status word is returned in the array ARY, the word links 
to a node name or a complete title, depending on the TYPE.RETURNFULLNAMEF 
parameter. Whenever a fixed info link word is returned in the array ARY, the word links 
to additional information for the file, including a file status word. 


In the examples that follow, the level of a file status word means the value in the 
LEVELF ([3:04]) field of the file status word. 

SUBTYPE 0 Call with a Directory Name 
Suppose that there is a resident file named A/B/C, and suppose that there is no file 
named A/B. The response to a SUBTYPE 0 call for file A/B would be a fixed information 
link word that links to a level 2 file status word for the directory A/B. 

SUBTYPE 1 Call with a File Name 
Suppose that there is a file named A/B and that there are no files under the A/B/= 
directory. ASUBTYPE 1 call for the directory A/B would return a level 1 file status 
word for the directory A and a level 2 file status word for the file B. 
Suppose that there is a file named A and no files under the A/= directory. The response 


toa SUBTYPE 1 call for the directory A/B would be a soft error word with error code 49 
(“NO FILE”). 
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SUBTYPE 1 Call with MASK Bits 


Suppose that there is a file named A/B/C that is not a code file. Suppose that a 
SUBTYPE 1 call for the directory A/= is issued with MASK bit 31 turned on (request 
for a copy of segment 0 of a code file) and all other MASK bits turned off. GETSTATUS 
would return a level 1 file status word for A, a level 2 file status word for B, and a fixed 
info link word for C. The validity mask word for the linked information would have bit 0 
on for the level 3 file status word that follows. Bit 31 of the validity mask word would be 
off because segment 0 information is not available for noncode files. — 


SUBTYPE 1 Call with TYPE.RETURNFULLNAMEF Turned On 


Suppose that there is a file named A/B/C. The response to a SUBTYPE 1 call for 

the directory A with TYPE.RETURNFULLNAMEF (TYPE.[40:01]) turned on and 
TYPE.DISPLAYFORMNAMEF (TYPE.[39:01]) turned on would be a level 3 file status 
word for A/B/C. 


SUBTYPE 1 Call Showing the Effects of Usercode and Family Name on Level 


TYPE.RETAINUSERCODEF increases by 1 the level reported for files found under the 
usercode directory of the process, but TYPE.LINKINONPARTF does not affect the level 
reported. 


Suppose that the process is running under the usercode X and that there is a disk file 
named (X)A/B/C: 


e ASUBTYPE 1 call for A would return a level 1 file status word for A, a level 2 file 
status word for B, and a level 3 file status word for C. 


e ASUBTYPE 1 call for A with TYPE.RETAINUSERCODFEF turned on would return 
a level 1 file status word for X, a level 2 file status word for A, a level 3 file status 
word for B, and a level 4 file status word for C. 


e ASUBTYPE 1 call for (X)A with RETURNFULLNAMEF turned on but 
TYPE.RETAINUSERCODEF turned off would return a level 3 file status word for 
A/B/C. 


e ASUBTYPE 1 call for A with TYPE.LINKINONPARTF turned on, 
TYPE.RETURNFULLNAMEF turned on, and TYPE.RETAINUSERCODEF turned 
off would return a level 8 file status word for A/B/C ON DISK. 
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SUBTYPE 1 Call Using SUBCLASS. MAXLEVELF 


The results of SUBCLASS.MAXLEVELF are unaffected by RETAINUSERCODEF 
and LINKINONPARTE Suppose that the process is running under usercode 

X and that there is a file named (X)A/B/C. For the examples that follow, 
TYPE.RETURNFULLNAMEF is turned on: 


e ASUBTYPE 1 call for A with SUBCLASS.MAXLEVELF = 1 would return a level 2 
File status word for A/B. 


e ASUBTYPE 1 call for A with SUBCLASS.MAXLEVELF = 1 and 
TYPE.RETAINUSERCODEF turned on would return a level 3 file status word for 
(X)A/B: 


e ASUBTYPE 1 call for A with SUBCLASS.MAXLEVELF = 1 and 
TYPE.RETAINUSERCODEF turned on, and TYPE.LINKINONPARTE turned on 
would return a level 3 file status word for (X)A/B ON DISK. 


e ASUBTYPE 1 call for AON DISK with SUBCLASS.MAXLEVELF = 1 would 
return a level 2 file status word for A/B. 


Effects of TYPE.USERCODEONLYF on All SUBTYPEs 


For the following cases, suppose that the process is running under the usercode X, that 
bit TYPE.USERCODEONLYYF is on, and that there is a resident public file named *A/B 
but no directory named (X)A/= or no file named (X)A/B: 

e ASUBTYPE 0 call for A/B would return a “NO FILE” soft error word. 

e ASUBTYPE 0 call for *A/B would return a fixed info link word for *A/B. 

e ASUBTYPE 1 call for A/B would return a “NO FILE” soft error word. 


e ASUBTYPE 1 call for * A/B would return a level 1 file status word for *A and a level 
2 file status word for B. 


Effects of TYPE.SYSTEMFILESONLYF (SUBTYPE 1, 2, and 4 only) 


For any SUBTYPE 1, 2 or 4 call, no file or directory with a usercode is returned if the 
TYPE.SYSTEMFILESONLYF bit is turned on. 


Suppose that there is a resident public file named (X)A/B. ASUBTYPE 1 call for (A 
or (X)A/B with TYPE.SYSTEMFILESONLYF turned on would return a “NO FILE” 
soft error word. The result would still be “NO FILE” whether the process was running 
under usercode X, another usercode (privileged or not), or without a usercode. 
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SUBTYPE 5 Calls (Copying a Volume Library) 


SUBTYPE 5 can be used to copy the entire contents of a volume library to a specific file. 
You do not need to have privileged status to use this call. 


Input 


The following is the array input needed for SUBTYPE 5: 


ARY Value or Description 

ARY [0] 2 

ARY [1] 0 

ARY [2] The beginning of the <file name> in which that copy is to be 


placed. The name can be in display or standard form, depending on 
TYPE.DISPLAYFORMNAMEF. You can also designate an <on part> 
construct. 


Results Returned 


The following information is returned when a volume library is copied: 


4-38 


The file created has a MAXRECSIZE of 30 words. The row size is derived from the 
directory and is currently 1200 segments. The file is CRUNCHED. 


The first record in the copied file contains the same information as described 
in “SUBTYPEs 8 and 7 (Copying a System Directory)” earlier in this section. 
In addition, word 8 contains the length (in number of words) used beginning at 
record 1. 


Record 1 contains (one word each) the information necessary to locate valid rows in 
the copied file. The number of words to be used is determined by word 8 of record 0. 
This value can exceed 30 words. Each word contains the beginning record address of 
a valid row. 


The organization of the volume library allows the copying of certain rows from 
the catalog file of the system; therefore, rows that do not contain information 
exist within the copied file. In fact, these rows are not even allocated space. The 
information from record 1 must be used to determine which rows are valid. 


Within a valid row, all information within that same row of the catalog of the system 
is copied. This copying is necessary because of linking that may have been generated 
within the volume library. The format of the information within a specific row can be 
obtained from the description of the volume library. 
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SUBTYPE 6 Calls (Disk Utilization) 


SUBTYPE 6 returns various information about sectors and areas on a family. This call 
corresponds to the DU (Disk Utilization) system command. 


Input 


The following array input information is needed for SUBTYPE 6: 


ARY Value or Description 

ARY [0] Index of the the first word of the family name. The value must be 
greater than or equal to 3. The family name must be in standard 
form. 

ARY [1] Family index of the unit within the family whose available space is 
to be returned. If 0 (zero), information about the entire family is 
returned. 

ARY [2] If SUBCLASS = 1, the value contained in ARY [2] is used as the 


specified size to base comparisons on. If SUBCLASS = 0, then the 
default size of 504 segments is used as the specified size. 


Results Returned 


The following information is returned by SUBTYPE 6: 


Word Contents 

Word 1 The total number of available sectors. . 

Word 2 The size, in sectors, of the largest available area. 

Word 3 The number of areas smaller than the specified size. 

Word 4 The total number of sectors in areas smaller than the designated 
size. 

Word 5 The number of areas larger than or equal to the designated size. 

Word 6 The total number of sectors in areas larger than or equal to the 
designated size. 

Word 7 The number of disk rows (areas) of the designated size that can be 
allocated. 

Word 8 The default size used when SUBCLASS = 0. This is currently equal 
to 504 sectors. 

Word 9 Total disk capacity in sectors of the family member designated in 
ARY [1]. If ARY [1] is 0, the value is the capacity of the entire 
family. 
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If the SIZE(ARY) is greater than 16, GETSTATUS returns the following additional 


information: 
Word 
Words 11-15 


Word 16 


Contents 


These words correspond exactly to words 3 through 7, except that 
the default number of sectors per area for STREAM and BLOCKED 
file structures is used as the designated size. 


The default number of sectors per area for STREAM and BLOCKED 
file structures that was used in constructing words 11 through 15. 


SUBTYPE 7 Calls (Copying a System Directory) 


SUBTYPE 7 can be used to copy a system directory. You must have privileged user 


status to use this call. 


Input When Using the Unit Number 


ARY 
ARY[O] 
ARY[1] 


ARY[2] 
ARY{3] 
ARY[4] 
ARY{5] 
ARY[6] 


Description 

Value should be 6. 

0 for either a memory disk or a regular disk pack. 
O & 1 [15:08] for a memory disk. 

O & 17 [15:08] for a regular disk pack. 

The unit number. 

Not used. 

Not used. 

Not used. 


The beginning of the file name in which the copy is to be placed. 
The file name can be in display or standard form, depending on 
TYPE.[39:01]. You can also designate an <on part> construct. 


Input When Using the Disk FAMILYNAME 


ARY 

ARY[0] 
ARY{1] 
ARY{2] 


ARY[3] through 
ARY [5] 


ARY{6] 


Description 

Value should be 6. 

O & 18 [32:17]. 

Not used. 

Disk FAMILYNAME in substandard form. 


The beginning of the file name in which the copy is to be placed. 
The file name can be in display or standard form, depending on 
TYPE.DISPLAYFORMNAMEF. You can also designate an <on part> 
construct. 
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The file created has a MAXRECSIZE of 30 words. The row size is derived from the 
directory and is currently 600 sectors. 


- The first record in the file contains the following: 


Word Description 

Word 0 Serial number of the unit that contains the family that was copied. 

Word 1 External device unit number from which the copy was performed. 

Word 2 Date on which the copy operation was performed (in binary and in 
the form YYDDD). 

Word 3 Time of day that the copy operation was performed (in 


Words 4 through 6 
Word 7 


2.4-microsecond intervals of time). 
The family that was copied (in substandard form). 


Record address within the file that contains the first copied 
information. 


The remainder of the file beginning at record 1 contains an exact copy of all the in-use 
headers in that family. In the following explanations, HDR is an array into which a 
record of the file has been placed. The version number of a header is contained in 
HDR[5].[47:04]. 


Examples of the contents of Version 6 headers are provided in the following list, with 
file attributes capitalized. The layout of the Version 6 header is described in the I/O 
Subsystem Programming Guide. 
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The header in-use flag is 4"3F3F" in HDR[0].[47:16]. 
The header block length is in HDR(0].[31:11], which is the length of the record in 


words. 


The FILEKIND is in HDR[1].[35:12]. 
The title of the file in standard form is at POINTER (HDR [HDR(8}.[35:12]], 8). 
The EXTMODE at file creation is stored in HDR[2}.[42:3]. 


HDR[2].[89:1] is turned on if the UNITS file attribute was TRUE at file creation. 


The BLOCKSIZE (in words or characters, as specified by UNITS) is in 
HDR{(8].[47:16]. 


The AREAS, or number of rows, of the file is HDR[5].[83:10]. Each area (or disk 
page) has one mass-address word. The mass-address word of area 0 is indexed by 
HDR[1).[19:8]. The mass-address word of area 1 is indexed by HDR[1].[19:8] + 1, 
and so on. The following is the format of a mass-address word: 


- Bit [48:1] indicates whether or not the area is allocated. 
- The disk segment address of the mass-address word is in bits [82:33]. 


- Bit [42:1] is turned on if FAMILYINDEX was designated by the programmer at 
file creation. 


The ROWSIZE (the AREASIZE expressed in segments) is in HDR[5].[23:24]. 


GETSTATUS Request Type 3 (Directory Calls) 


Bit HDR[7].[44:1] is turned on if the file is CRUNCHED. 


The end-of-file (in segments) is in HDR[9].[27:28]. If the end-of-file does not 
fall on a segment boundary, the count of bits used in the additional segment is in 
HDR[9].[47:20]. 


The number of segments used in the last allocated area depends on whether or not 
the file is CRUNCHED. If the file is not CRUNCHED, the number of segments used 
in the last area is ROWSIZE. But if the file is CRUNCHED, the number of segments 
used in the last allocated area might be less than ROWSIZE. The following algorithm 
is used to determine the size of the last allocated area: 


S := HDR[9]. [27:28] %SEGMENTS 
+ REAL(HDR[9] . [47:2] NEQ 8); “BITS IN LAST SEGMENT 
A := CASE (HDR[2]. [39:1] %EXTMODE 
*HDR[2]. [42.3]) “MODE 
OF (1, 1, 12, 8, 6, 6) * 30; | 
%SINGLE, DOUBLE, HEX, BCL, ASCII, EBCDIC 
B := (HDR[3].[47:16] + A -.1) DIV A; %BLOCKS IN EXTMODE UNIT 


The number of segments occupied by a CRUNCHED file in its last allocated area is 
as follows: . 


(IF(S MOD B) = @ THEN S ELSE (S - (S MOD B)) +B); 


After GETSTATUS has created a copy of the directory in a disk file, that disk file 

is locked as a CRUNCHED file with SECURITY = PRIVATE. The file should be 
processed with a FILETYPE of 8. Although MAXRECSIZE is 30 words, each in-use 
area might take more than 30 words, depending on the length specified in word 0 of 
the in-use area. Each in-use area begins on a segment boundary and uses an integer 
number of segments. The file is CRUNCHED. 


SUBTYPE 9 and 10 Calls (Copying a Volume Directory) 


SUBTYPEs 9 and 10 can be used to copy volume directory data records. You can use 
these SUBTYPEs only if the TAPECHECK = AUTOMATIC option of the system 
command SECOPT (Security Options) has been designated on the system. 


Input 


The following array input information is needed for SUBTYPEs 9 and 10: 


ARY Value or Description 
ARY [0] 2 
ARY [1] 0 


continued 
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continued 
ARY Value or Description 
ARY [2] The beginning of the name of the file that the records from the 
volume directory are to be copied to. The name can be in display or 
standard form (depending on TYPE.DISPLAYFORMF). You can 
include a family name in the file title. The file that is created has a 
FILETYPE of 1. This file can be read by a logical file declaration that 
specifies FILETYPE = 1, DEPENDENTSPECS = TRUE, and 
INTMODE = SINGLE. 
Results Returned 


In the disk file that is created, the first word of each record is the count of words in the 
record. The words that follow this first word are an exact image of a volume directory 
data record. The format of volume directory records is documented in the A Series 


Security Administration Guide. The maximum record size of any record in the file is 
2049 words. 


If SUBTYPE =9, all volume directory data records are copied. This form of the call can 
be used only by privileged users. 


If SUBTYPE = 10, the volume directory data records that are copied are those whose 


FAMILYOWNER matches the usercode of the task. This form of the call can be used by 
privileged and nonprivileged users. 


SUBTYPE 11 Calls (Reading an Archive 
Directory Record) 


This call allows a nonprivileged process to retrieve a copy of an archive directory record 
by file title for any file owned by the usercode of the process. A privileged process can 


retrieve a copy of any selected archive directory record by file title (file name and family 
name). 


Input 


The following array input information is needed for SUBTYPE 11: 


ARY Value or Description 

ARY [0] 2 

ARY [1] 0 

ARY [2] forward Disk file TITLE in standard form (including family name) 
Results Returned 


This call returns the archive record for the file with the designated title from the archive 
directory for the disk family name included in the file title. 
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If the family name matches the target name of an active family substitution statement 
for the calling process, family substitution takes place. 


If no usercode or asterisk (*) usercode is included in the title (the security byte = 1 or 5) 
and the process is running under a privileged usercode, GETSTATUS first searches 
under the process usercode. If GETSTATUS does not find a record with that title, 
GETSTATUS makes a second search under the asterisk (*) usercode directory. 


GETSTATUS returns the record starting in word 2 of the array ARY and replacing the 
file title. The length in words of the archive directory record appears in bits [31:11] of 
the first word of the record (bits [31:11] of word 2 of the array ARY). 


An archive record can be as long as 2047 words. Refer to the description of the format 
of archive directory records in the A Series Disk Subsystem Administration and 
Operations Guide. 


GETSTATUS returns hard error 130 for the following reasons: 


e The system cannot find an archive record for the named file. 


e Anonprivileged process tries to retrieve an archive record for a file that does not 
belong to that user. 


e The family is not online or does not have an active archive directory. 


Example 


The following example illustrates how to retrieve an archive record for a file titled 
MY/FILE ON WORKPACK. 


ARRAY ARY [@:2058]; BOOLEAN B; 
ARY [@] := 23 
REPLACE POINTER (ARY [2]) BY 
48"140593", 48"82", 8"MY", 
48"04", 8"FILE", 
48"98", 8"WORKPACK"; 
B := GETSTATUS (3 & 11 [15:88], 9, 8, ARY); 


SUBTYPE 12 and 13 Calls (Copying Records from an 
Archive Directory) 


Use SUBTYPEs 12 and 13 to copy archive directory data records. 


Input 


The following array input information is needed for SUBTYPEs 12 and 13: 


ARY Value or Description 
ARY [0] 6 
ARY [1] 0 & 12 [32:17] 


continued 
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continued 
ARY Value or Description 
ARY [2] through ARY The family name (in substandard form) whose archive directory is to 
[5] be copied. 
ARY [6] The beginning of the title of the file that the records from the archive 
directory are to be copied to. The title can be in display or standard 
form (depending on TYPE.DISPLAYFORMF). You can include a 
family name in the file title. The file that is created has a FILETYPE 
of 1. This file can be read by a logical file declaration that contains 
the following designations: 
e FILETYPE = 1 
e DEPENDENTSPECS = TRUE 
e INTMODE = SINGLE 
Results Returned 


In the disk file that GETSTATUS creates, the first word of each record is the count 

of words in the record. The words that follow this first word are an exact image of an 
archive directory data record. The maximum record size of any record in the file is 2049 
words. The format of archive records is documented in the A Series Disk Subsystem 
Administration and Operations Guide. 


If SUBTYPE = 12, GETSTATUS copies all archive directory data records. This form of 
the call can be used only by privileged users, privileged programs, and processes started 
from the ODT. 


If SUBTYPE = 18, GETSTATUS copies archive directory data records with file names 
that belong to the calling process (where ownership is determined by usercode). This 
form of the call can be used by privileged and nonprivileged users. 


Examples 


The following example shows how to copy archive records from the archive directory 
for the disk family named TESTPACK to a new file named MYARC/TESTPACK ON 
TESTPACK. 


ARY [8] := 6; 
ARY [1] := @ & 12 [32:17] 
% INPUT FAMILY NAME "TESTPACK" 
REPLACE POINTER (ARY [3]) BY 48"98", 8"TESTPACK"; 
% OUTPUT FAMILY NAME “MYARC/TESTPACK ON TESTPACK" 
REPLACE POINTER (ARY [6]) BY 48"1B9503" 
48"05", 8"MYARC", 48"98", 8"TESTPACK", 
48"08", 8"TESTPACK"; 
B := GETSTATUS (3 & 13 [15:88], 8, @, ARY); 


The previous example can be continued with the following example that demonstrates 
how to read and process the records that GETSTATUS copied to the new file 
MYARC/TESTPACK ON TESTPACK. This example prints the names of the files 
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recorded in the file as well as the names and serial numbers of the library maintenance 
tapes on which the files have backup copies. 


REAL BKNO, G, X;3 %BKNO = @ OR 1 (BACKUP NUMBER) 
REAL SNS; POINTER PSNS; %SERIAL NUMBERS 


FILE PRT (KIND = PRINTER); 

ARRAY OUT [6:4008]; POINTER POUT; 

FILE AIN (KIND = DISK, NEWFILE=FALSE, FILETYPE=1, 
DEPENDENTSPECS=TRUE, INTMODE=SINGLE, 
TITLE="MYARC/TESTPACK ON TESTPACK."); 

ARRAY BUF [@:2048]; %MAX RECORD SIZE IS 2849 WORDS 

DEFINE ARBUF [X] = BUF [(X) + 1] #3; %BIAS OVER LENGTH WORD 
POINTER PIN; 


% PARTIAL DEFINITION OF ARCHIVE RECORD STRUCTURE 


DEFINE 
ARSRX = 3 #, 
ARSRF = [11:12] #, %INDEX TO SUBRECORD 
ARSIZEF = [23:12] #, %LINK TO FILE NAME 
ARLINKF = [11:12] #, ‘INDEX OF CONTENT IN VARIABLE PART 
ARTITLEX = 6 #, ‘LINK TO FILE NAME 
ARGBKSX = 9 #, %PAIR OF BACKUP INFO WORDS; AT 
% LEAST ONE BACKUP MUST EXIST OR 
% SUBRECORD (& RECORD) SHOULD BE 
% REMOVED FROM SYSTEM/ARCHIVE... 
% DIRECTORY. 
ARGTYPEF = [37:04] #, *TYPE OF BACKUP ENTRY 
ARGEMPTYV = © #, “NO ENTRY OR DELETED ENTRY 
ARGNAMESX = 13 #, %*SETS OF FOUR 18-CHARACTER TAPE NAMES 
ARGSNSX = 29 #; %*SETS OF FOUR LINKS TO SERIALNO LISTS 


WHILE NOT READ (AIN, 2049, BUF) DO 

BEGIN 

* PRINT FILE NAME 
REPLACE POUT := POINTER (OUT) BY " " FOR 256; 
PIN := POINTER (ARBUF [ARBUF [ARTITLEX] .ARLINKF] ); 
STANDARDTODISPLAY (PIN, POUT); 
WRITE (PRT, 15, OUT); 
G := ARBUF [ARSRX] .ARSRF; 
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% 


% 
END; % 
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PRINT TAPE NAME AND SERIAL NUMBER LIST FOR ONE TO FOUR BACKUPS 
FOR BKNO := @ STEP 1 UNTIL 3 DO 
IF ARBUF [G + ARGBKSX + BKNO].ARGTYPEF GTR ARGEMPTYV THEN 
BEGIN 
REPLACE POUT := POINTER (OUT) BY " " FOR 132; 
X := G + ARGNAMESX + 3*BKNO; 
REPLACE POUT: POUT + 5 BY POINTER (ARBUF [X]) + 1 
FOR ARBUF [X].[47:08], ": "; 
X := G@ + ARGSNSX + BKNO; 
SNS := ARBUF [X] .ARSIZEF; 
PSNS := POINTER (ARBUF [ARBUF [X] .ARLINKF]); 
% PRINT AT MOST 6 SERIAL NUMBERS PER LINE 
THRU (SNS + 5) DIV 6 DO 
BEGIN 
THRU (MIN (SNS, 6)) DO 
BEGIN 
SNS := *-13 
REPLACE POUT:POUT BY PSNS:PSNS FOR 6, ", "3 
END; 
WRITE (PRT, 15, OUT); 
REPLACE POUT := (POINTER (OUT) BY " " FOR 1323 
POUT := POUT + 24; 
END; 
END; OF DOUBLE LOOP OVER BACKUP SLOTS 
END OF READ FILE LOOP 


SUBTYPE 14 Calls (Open File Information) 


Use SUBTYPE 14 to implement the system command SHOWOPEN. Each request 
returns information about one open disk file. The file can be a permanent disk file (that 
is, recorded in the system directory) or a temporary disk file. Each response updates 
A[1] with the header index of the file that was found. This value should be left in the 
array A so that it can be used by GETSTATUS as a starting point to resume the search 
on the next call. If you set A[1] to 0, the next GETSTATUS call will restart the search 
through the headers. , 


Input 


The following array input information is needed for SUBTYPE 14: 


ARY Value or Description 

ARY [0] 8 

ARY [1] 0 or the disk file header index returned by a preceding call. For the 
first call, A[1] should contain 0. For all subsequent calls, 
GETSTATUS will automatically use the value in A[1] to locate the 
next open disk file. 

ARY (2].[7:8] 0 or the family index. If the value is 0, the report is for all open files 
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on all disks in the family. If the value is greater than 0, the report is 
only for open disk files on that family index of the family. 


continued 
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continued 
ARY Value or Description 
ARY [3] If the report of open files is to be limited to open files in an address 
range of a particular member of the family, A[3] should contain the 
starting sector address of that range. 
ARY [4] 0 if the report of open files is not to be limited to an address range. 
: If the report is to be limited to open files in an address range of a 
particular member of the family, A[4] should be the number of 
sectors in the address range (that is greater than 0) and A[2].[7:8] 
must be greater than 0. 
ARY [5] Family name in substandard form. 
Results Returned 


The information to be returned is specified in the MASK parameter (refer to Table 4—1). 
GETSTATUS returns either a soft error word, a file status word, or a validity mask 
word and fixed information as requested by the MASK parameter. For a description of 
the format of this information, refer to the appropriate areas discussed in “General 
Format of Results from Directory Calls (SUBTYPEs 0, 1, 2, and 4)” earlier in this 
chapter. 


If an error is found in the parameters, if there is a security error or if the disk family 
is not online, GETSTATUS returns a soft error word in word 1 of the array ARY. If 
there are no (more) open files on the family (in the selected address range, if any), 
GETSTATUS returns soft error word 239 (NO MORE OPEN FILES). — 


If GETSTATUS does not detect any errors, and if you do not specify any MASK bits 
in the call or if you specify only MASK bit [0:1], GETSTATUS does not return any 
information about the file. But GETSTATUS does put the disk file header index into 
word 1 of the ares. 


If GETSTATUS dees not detect an error, and if you specify MASK bits other than [0:1] 
in the call, GETSTATUS returns a validity mask word in word 8 of the array. This is 
followed by a file status word in word 9 and information for MASK bits 1 through 47 in 
word 10 through 56. These words in turn point to information, such as the file title, that 
is returned elsewhere in the array. Refer to Table 4-1 and Figure 4-1. GETSTATUS 
does not return any catalog or archive information for SUBTYPE 14 calls. 


If there are no errors, GETSTATUS stores a disk file header index in Word 1 of the 
array ARY for use in a subsequent call for the next file. 
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Section 5 
GETSTATUS Request Type 4 (Disk and 
Tape Volumes) 


These calls allow you to retrieve information from the volume library or volume 
directory. For methods of obtaining complete copies of volume library or volume 
directory records, refer to “SUBTYPE 5 Calls (Copying a Volume Library)” and 
“SUBTYPE 9 and 10 Calls (Copying a Volume Directory)” in Section 4 of this manual. 


SUBTYPE O Calls (Volume Library Information) 


This call allows any process to retrieve information about any tape or disk volume 
listed in the volume library. The data retrieved includes information about the volume 
specified by serial number plus the serial numbers and status of other volumes in the 
same family. Tape volumes are in the same family if a file or files were written to them 
with intervening reel switches. This call corresponds to the system command PV (Print 
Volume). It can be used only if OP + CATALOGING has been specified on the system. 


Input 


The array ARY must be at least 23 words long and should be at least 21 + 2 times the 
number of volumes in the family words long. 


ARY Value or Description 

ARY [0] 4 | 

ARY [1] Serial number (6 EBCDIC characters) 
ARY [2] 1 if the volume is a disk 


15 if the volume is a tape 
17 if the volume is a disk pack 
ARY [3] 0 


Call 


B := GETSTATUS (4 & @ [15:88], &, @, ARY); 
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Results Returned 


The information returned for SUBTYPE 0 calls is as follows: 


Word Number 
Word 1 


Word 2 
Word 4 
Word 5 
Word 6 - 
Word 9 
Word 10 
Word 11 
Word 15 


Words 20 through 
20 + 2 * ARY [2] 


Description 


If bit [47:01] is turned on, ARY [1] contains a soft error word. 
Otherwise, ARY [1] contains a descriptor code for the requested 
volume as follows: 


e If bit [23:01] is turned on, the volume is a scratch tape. 


e = If bit [17:01] is turned on, aWFL VOLUME DESTROYED 
statement has been executed for the volume. 


e = If bit [16:01] is turned on, the volume is the base volume of the 
family. : 


Count of volumes reported (starting in ARY [20]). 
Family name in substandard form. 
Continuation of family name in substandard form. 
Continuation of family name in substandard form. 
System serial number of the family creation site or 0. 
SAVEFACTOR or 0. 
Binary family creation date or 0. 
Count of volumes in the family. 
Each has two words for each volume in the family: 
e First word: SERIALNO value of volume (6 EBCDIC characters). 
e Second word: Bit codes as follows: 
— If bit [23:01] is turned on, the volume is a scratch tape. 


- If bit[17:01] is turned on, a WFL VOLUME 
DESTROYED statement has been executed for the 
volume. 


- If bit [16:01] is turned on, the volume is the base volume 
of the family. 


Soft error word 126 is returned in word 1 if the serial number is error word 126 is 
returned in Word 1 if the serial number is not found in the volume library. 
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SUBTYPE 1 Calls (Volume Directory Record) 


This call allows a privileged process to retrieve a copy of any selected volume directory 
record by serial number. This call corresponds to the system command TV (Type 
Volume). It can be used only if the TAPECHECK = AUTOMATIC option of the 
SECOPT (Security Options) system command has been specified on the system. 


Input 


The following array input is needed for SUBTYPE 1 calls: 


ARRAY Value or Description 
ARY [0] 4 
ARY [1] Serial number of the volume whose volume directory record is being 
retrieved (6 EBCDIC characters) 
ARY [2] 15 (tape) 
Call 


B := GETSTATUS (4 & 1 [15:98], 8, @, ARY); 


Results Returned 


The requested volume directory record is returned starting in word 4 of ARY. Refer 

to the Security Administration Guide for the format of volume directory records. 
Errors are returned in the normal manner. Ifa soft error occurs, GETSTATUS 
returns a Boolean value of TRUE with bits [11:08] of the Boolean result equal to 0, and 
GETSTATUS stores the soft error word in ARY [1]. 
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section 6 
GETSTATUS Request Type 5 
(Unit Requests) 


GETSTATUS unit requests are grouped under Request Type 5. This GETSTATUS 

call retrieves information about peripheral units as well as about the volumes and 
sometimes the files on these units. The controller uses these GETSTATUS calls to 
retrieve information for such displays as those generated by the PER (Peripheral Status) 
and OL (Display Label and Paths) system commands. 


For most GETSTATUS unit requests, you need to understand the 6-bit UNITTYPE 
codes. (See Appendix C for a list of unit type codes.) UNITTYPE codes often 
correspond to the values of the file attribute KIND. Some of the information returned 
for GETSTATUS unit requests uses the same numerical codes as information returned 
by SYSTEMSTATUS peripheral requests. It is necessary to refer to the explanations in 
the A Series SYSTEMSTATUS Programming Reference Manual to understand those 
values returned by GETSTATUS. 


To use unit calls, the calling process must have privileged status or the call must be 
started from an ODT with a WFL JOB or RUN statement, but not with a primitive 
??RUN system command. Otherwise, a security error occurs and GETSTATUS returns 
hard error 43 (refer to Appendix A). 

The general form of the GETSTATUS call is as follows: 


B := GETSTATUS (TYPE, SUBCLASS, MASK, ARY); 


Parameters 


The parameters for Request Type 5 calls are described in the following pages. 


TYPE 


This parameter generally selects the specific case and subcase within the GETSTATUS 
intrinsic. For unit requests, the fields within the word are as follows: 


e TYPE.TYPEF [7:08] = 5 
_e TYPE.SUBTYPEF [15:08] 
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TYPE.SUBTYPEF [15:08] can have one of the following values: 
SUBTYPE Description 


0 Retrieves information for a specific list of one or more units by unit 
number. SUBTYPE 0 can be used for all kinds of units, including disks 
and packs. 


1 Retrieves information for the units within a designated range of unit 
numbers. — 


2 Retrieves information for all units of designated kinds that are assigned to 
a designated process. 


Reserved. 
Not valid. 


Retrieves information for a designated list (by unit number) of port and 
control units. The information to be retrieved is designated by parameter 
MASK bits (refer to Table 6-2). 


20 Retrieves information for a specific list of disks and packs. SUBTYPE 20 
retrieves some extra information that a SUBTYPE 0 call does not supply. 


21 Retrieves information for disk units within a designated range of unit 
numbers. SUBTYPE 21 retrieves some extra information that a 
SUBTYPE 1 call does not supply. 


SUBCLASS 


MASK 


If SUBCLASS is negative (the sign bit is turned on), GETSTATUS can report on 
the units assigned to invisible independent runners; if the sign bit is turned off, 
GETSTATUS does not report them. 


For SUBTYPEs 0, 1, 2, 5, 20, and 21, the MASK parameter is used to select the unit 
attributes and status information to be retrieved by GETSTATUS. Each bit that is 
turned on in the MASK parameter instructs GETSTATUS to report the corresponding 
unit, volume, or file information (refer to Tables 6-1 and 6-2 for a listing of valid MASK 
bits and their uses). 


Array ARY Parameter 


6-2 


The caller should place information such as unit numbers and so forth in the array ARY 
to indicate to GETSTATUS the units that are to be reported. In turn, GETSTATUS 
stores the retrieved status and attribute information into the array ARY. The exact 
format of the array parameter and result information is described later under the 
description of each particular SUBTYPE. 
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Request Type 5 Calls by SUBTYPE 


The following Request Type 5 calls are described by SUBTYPE for the sake of 
functionality and common characteristics. 

General Input Information 
Some values reported in Table 6-1 correspond exactly to file attributes. Other values 
are related to units and file status. These latter values are mainly for internal use by the 
MCP and might change in future releases. 


In the information tables that follow (Tables 6-1 and 6—2) , the link format for unit 


requests is as follows: 
Field Description 
GSINFOF [15:16] This value is the length in bytes of the item linked. 
XSLINKF [32:17] This value is the word offset to the beginning information in 


the array ARY. When this offset is added to the base, the 
offset gives the index of the information. Refer to Figure 6-1. 


Many of these links point to a name that is in standard form. For a description of 
standard form, refer to the DISPLAYTOSTANDARD function in the DCALGOL 
Reference Manual. 


Table 6-1. Status Information Reported for SUBTYPE 0, 1, 2, 20, and 21 Calls 


MASK Bit Description 


Unit number. 


Contents of MCP UNIT word. Bits [47:06] contain the UNITTYPE code 
(refer to the SYSTEMSTATUS Reference Manual). The 
UNITTYPE code is related to the file KIND attribute. For ODT units, bit 
[22:01] is turned on if the ODT is restricted. 


Has the value 1 if the unit is ready or is assigned to a process. Refer to 
MASK bit 5. . 


Reliability factor. Refer to the system command RF (Reliability Factor). 


UNITSTATISTICS word. Refer to the SYSTEMSTATUS Reference 
Manual for details. 


If the unit is assigned to a single process, this bit contains the stack 
number of that process. 


Disk or magnetic tape SERIALNO value in 6 EBCDIC characters. 


For magnetic tape units, the FILESECTION value of the file at which the 
tape is positioned. 


For disk units, the FAMILYINDEX value of the volume. 


continued - 
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Table 6-1. Status Information Reported for SUBTYPE 0, 1, 2, 20, and 21 Calls (cont.) 


MASK Bit Description | | | 


For magnetic tape units, the SAVEFACTOR value of the file at which the 
tape is positioned. 


For disk units in SUBTYPE 20 or 21 calls, the following values apply: 
e Bit [0:01] is turned on if the unit is saved. 
e Bit [1:01] is turned on if the unit does not have a labeled volume. 


e Bit [2:01] is turned on if the unit is assigned to a process. 


e Bit [3:01] is turned on if an error occurred while the system was 
readying the disk. 


e___ Bits [45:03] contain the COMS COACTIVE transition state. 


e Bits [47:02] = 0 if the disk is not part of a family that has been 
designated for use by COMS COACTIVE files.. 


e Bits [47:02] = 1 if the disk is in the Reader state and has been 
designated for use by COMS COACTIVE files. 


e = Bits [47:02] = 2 if the disk is in the Writer state and has been 
designated for use by COMS COACTIVE files. 


For magnetic tape, the creation date of the file at which the tape is 
positioned. 


For disks, the date that the original base pack of the family was 
reconfigured in binary. When printed in decimal, the date is in the form 
YYDDD, where YY is the year and DDD is from 1 to 366. 


For CD-ROM, the date that the CD-ROM was created. 
For disks, a link to the FAMILYNAME in standard form. 
For external I/O units, link to stacks. 
For CD-ROM units, link to CD name in standard form. 
For other units, link to filename in standard form. 
For magnetic tape, the numerical code for the DENSITY. 


For disk units in SUBTYPE 20 or 21 calls, a link to the host name of the 
writer system in standard form if the disk is part of a family that has 
been designated for use by COMS COACTIVE files. 


12 For magnetic tape volumes, the LABELKIND value. Bit [47:01] is turned 
on if the volume is a library maintenance tape that contains files with 
license keys. 


For CD-ROM, bits [47:01] are turned on if the CD-ROM is in library 
maintenance format and contains files with license keys. Bits [46:01] 
are on if the CD-ROM is in library maintenance format. 


continued 
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Table 6-1. Status Information Reported for SUBTYPE 0, 1, 2, 20, and 21 Calls (cont.) 


MASK Bit Description . ; 


EXTMODE attribute of the file on the unit. 
For disk units, the following values apply: 
e Bit [0:01] is turned on if the volumes has been purged. 


e Bit [1:01] is turned on if the volume needs to be initialized, verified, 
and reconfigured. 


Bit [2:01] is turned on if an error has occurred while the system 
was readying the unit (or if the system has not finished readying the 
unit). 


Bit [3:01] is turned on if the volume SERIALNO value matches the 
serial number of another disk on the system. 


Bit [4:01] is turned on if the disk unit has been closed. 

Bit [5:01] is reserved. 

Bit [6:01] is turned on if all Os to the unit are canceled. 

Bit [7:01] is turned on if the unit is saved. 

Bit [8:01] is turned on if the unit is reserved for maintenance. 


Bit [9:01] is turned on if an error occurred while the system was 
readying the unit. 


Bit [10:01] is turned on if the unit is saved. 


Bit [11:01] is turned on if the volume is a member of the halt/load 
family. 


Bit [12:01] is turned on if the system has read label information 
from the volume. 


Bit [13:01] is turned on if the unit is part of a mirrored set. 


Bit [14:01] is turned on if the unit is one on which the cache 
feature is being used. 


Bits [47:04] contain one of the following codes: 

—  Oif the volume is an INTERCHANGE volume. 
- 1 if the volume is the basepack. 

- 2 ifthe volume is a continuation pack. 


- 3 ifthe volume label has not been (or could not be) read by the 
system. 


If the unit is assigned to a visible process, a link to the NAME of that 
process in standard form. 


continued 
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Table 6-1. Status Information Reported for SUBTYPE 0, 1, 2, 20, and 21 Calls (cont.) 


MASK Bit Description 


For disk packs, 8 plus the unit subtype code that the system uses to 
distinguish between various kinds of disk packs. Refer to the 
SYSTEMSTATUS Reference Manual for a list of the code values. 


For disk units, the capacity of each storage unit in sectors. 


For disk units, the number of lock-out switches per storage unit. 


19 For memory disks, the bit mask of switches locked out. 
For disk packs, 1 if the family member is an IAD pack. 
For memory disks, the bit mask of [AD switches. 


For mirrored disk units, a code for the mirror recovery option of the unit: 


e 0 = Discard 
e 1=DMS 
Refer to the system command MIRROR OPTION PK < unit no. > 


For disks, the volume SERIALNO value in binary of the original base 
pack of the family. 


23 A link to the FORMID value of the unit or of the file on the unit in 
standard form. . 


For disks and CD-ROMs, a count of the number of open files and users of 
the disk or the number —1. 


To calculate this count, GETSTATUS must procure various directory 
locks. GETSTATUS must make present and examine the headers for all 
open disk files at the system. If the elapsed time of the GETSTATUS call 
exceeds 5 seconds, GETSTATUS skips the counting procedure and 
reports —1 instead. Refer also to MASK bit 32. 


Link to the peripheral association list (refer to the system command PA). 
The first word of the list contains the count of entries. The entries begin 
in the second word, and each entry is two words long. The first word is 
the folded UNITTYPE code, and the second word is the unit number. 


26 The count of the number of units associated with this unit. Refer to the 
system command PA (Peripheral Association). 


File CYCLE attribute. 
File VERSION attribute. 


continued 
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Table 6-1. Status Information Reported for SUBTYPE 0, 1, 2, 20, and 21 Calls (cont.) 


MASK Bit Description | 
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For data comm units (UNITTYPE = 16): 

e Bit [47:01] is turned on if bits [40:05] and [35:04] are valid: 
- Bits [40:05] contain the relative DCP number. 
- Bits [35:04] contain the relative cluster number. 


Bits [31:08] contain the programmable read-only memory (PROM) 
level. 


e Bits [23:08] contain the PROM patch. 

e Bits [15:08] contain the firmware level. 

e Bits [7:08] contain the firmware patch. 

For printer units: 

e = Train ID of printer. 

e For disk units in SUBTYPE 20 or 21 calls, the sector size in bytes. 
For HYPERchannel units: 

e Bits [47:08] contain the READPARTNER address. 


e Bits [39:08] contain the READPARTNER log address. 
e Bits [31:08] contain the WRITEPARTNER address. 


Bits [23:08] contain the WRITEPARTNER log address. 

Bit [14:01] is turned on if the unit is reserved. 

Bit [13:01] is turned on if HYFILES partners have restrictions. 
Bit [12:01] is turned on if the unit is for BNA. 


Bits [11:04] contain the bit MASK of available trunks. Bit 11 is 
trunk O, and so forth. 


e Bits [7:08] contain the adapter number. 


For disk units in SUBTYPE 20 or 21 calls, the total capacity of the unit 
in sectors. 


For disks and CD-ROMs, either a count of the number of open files and 
users of the disk or the number -1. 


To calculate this count, GETSTATUS must procure various directory 
locks. GETSTATUS must make present and examine the headers for all 
open disk files at the system. If the elapsed time of the GETSTATUS call 
exceeds 60 seconds, GETSTATUS skips the counting procedure and 
reports —1 instead. Note the similarity with MASK bit 24. 
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Table 6-1. Status Information Reported for SUBTYPE 0, 1, 2, 20, and 21 Calls (cont.) 


For labeled tape and disk volumes, the system serial number in binary of 
the site that created the volume. 


For magnetic tape, the creation date of the file at which the tape is 
positioned. 


For disks, the creation date of the original base pack of the family in 
binary. When printed in decimal, the date is in the form YYDDD, where 
YY is the year and DDD is from 1 to 366. 


Creation time of the original base pack of the family in 2.4-microsecond 
intervals of time, or creation time of the CD-ROM. 


For host control (HC) units: 
e Bits [36:05] contain O or the READPARTNER number plus 1. 
e Bits [28:05] contain O or the WRITEPARTNER number plus 1. 


e Bit [23:01] is turned on if there are restrictions on the HCFILES 
HUBNUMBER value. 


Bit [22:01] is turned on if the unit is for BNA. 

Bits [12:02] contain the mode code: 

- 0Q=CLOSED 

- 1=IN 

- 2=0OUT 

- 3=10 
e Bits [19:04] contain the HUBNUMBER value. 
e Bits [15:16] contain the HUBINDEX value. 


For magnetic tapes: 


e Bit [47:01] is turned on if the BLOCKSIZE value of the file exceeds 
the maximum allowed on the unit. 


Bits [43:20] contain the maximum possible BLOCKSIZE value in 
bytes. 


Bits [19:20] contain the BLOCKSIZE value of the file in bytes. 


For disk units in SUBTYPE 20 or 21 calls, bit [1:02] determines 
whether the M9710 disk drive is single- or dual-ported. If bit 
[1:02] = 0, the drive is single-ported. If bit [1:02] = 1 or 2, the 
drive is dual-ported. 


0 if no ready paths exist to the unit. 
Internal code for the type of DLP used by the unit. 


continued 
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Table 6-1. Status Information Reported for SUBTYPE 0, 1, 2, 20, and 21 Calis (cont.) 


MASK Bit Description 


Contains 1 if the unit is available, and 0 if the unit has been freed. 


Index of path information for the unit. Refer to “lO Path Information” 
later in this section. 


Unit SUBTYPE value. Information on unit SUBTYPE values is located in 
the SYSTEMSTATUS Reference Manual. 


1 if the unit is suspended. 
Internal code for the type of DLP used by the unit or the number 10. 
O or the unit number of the base pack of the family. 


For external input/output units (EIOUs), link to a copy of the unit 
information (UINFO) table information for the unit. 


Link to mirror information. The mirrored disk information has the 
following format: 


e Word 0: 
- Bits [23:08] contain the number of pending mirrors. 
— Bits [15:08] contain the number of offline mirrors. 
- Bits [7:08] contain m, the number of online mirrors. 
Words 1 through m contain unit numbers of online mirrors. 


Words (m + 1) through 7 contain the unit numbers of pending 
mirrors. 


/O Path Information 


The first word of the information format contains general information. Word 1 has the 


following format: 

Field Name Description 

[47:04] SYSTEMTYPEF Contains 2 for Entry and Medium 

, Systems (EMS) and 4 for HDU 
systems. 

[43:08] DLPTYPEF Contains the type of DLP. 

[35:04] RELUNITF Contains the relative number of 
the unit with respect to the DLP. 

[18:01] UNITFREEDF Contains 1 if the unit has been 
freed, but 0 if the unit has not 
been freed. 

continued 
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continued 


Field 
[17:01] 


(16:01] 


(15:08) 


[7:08] 


Name 


SOMEPATHOUTBOARDF 


SOMEPATHHASFIRMWAREF 


UNITTYPEF 


NUMPATHSF 


Description 


Contains 1 if at least one path is 
through an outboard host and 0 if 
no paths are through an outboard 
host. 


Contains 1 if at least one path 
has firmware and 0 if no paths 
have firmware. . 


Contains the type of unit outboard 
of the DLP. 


Contains the number of existing 
paths to the unit. 


The second and subsequent words contain information specific to each path, six words 


per path. 


Word 1 of each path entry contains status information in the following format: 


Field 
[47:01] 


[45:01] 


[44:01] 


(43:01] 


[42:01] 


[41:01] 


[40:01] 


[39:01] 


{38:01] 
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PATHOFFLINEF 


PATHRESERVEDF 


PATHRESERVEDMAINTF 


PATHBROKENF 


- PATHHASSIGNEDF 


PATHOUTBOARDF 


PATHHASFIRMWAREF 


PATHINUSEF 


PATHREADYF 


Description 


Contains 1 if the path is offline 
and 0 if it is not offline. 


Contains 1 if the path is reserved 
and 0 if the path is not reserved. 


Contains 1 if the path is reserved 
for maintenance and 0 if the path 
is not reserved for maintenance. 


Is not applicable for EMS. For 
host data units (HDUs), the field 
contains 1 if the path is broken 
and 0 if it is not. 


Contains 1 if maintenance is 
running on the path and 0 if 
maintenance is not running on 
the path. 


Contains 1 if the path is through 
an outboard host and 0 if the 
path is not through an outboard 
host. 


Contains 1 if the path has 
firmware and 0 if it does not. 


Contains 1 if the path is currently 
selected for all //O operations to 
the unit and 0 if it is not. 


Contains 1 if the host can see the 
unit ready through this path and 
0 if it cannot. 


continued 
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DLPFREEDF 


Description 


Is not applicable for EMS. For 
HDUs, the field contains 1 if the 
DLP of the path has been freed 
and 0 if it has not. 


Word 2 of each path entry contains the path name. Word 2 is formatted as follows: 


Field 
[47:01] 


Name 


PATHNAMEF 


Description 


Contains the path identifier in 
EMS and the DLP identifier in 
HDU systems. 


Word 3 of each path entry contains firmware information. Word 3 is formatted as 


follows: 
Field 
[43:04] 


[39:40 


Name 


PATHFWDIGITSF 


PATHFIRMWAREF 


Description 


Contains the number of digits in 
the firmware identifier. 


Contains the firmware identifier. 


Word 4 of each path entry contains physical path information (machine dependent). 
Word 4 is formatted as follows: 


Field 
(23:04] 


[19:04] 


{19:02] 


[17:02] 


[7:04] 


[3:04] 
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lOPF 


PATHOUTBOARDF 


MLIF 


HDPF 


LEMPORTF 


DLPADDRF 


Description 


Contains the /O processor 
number. 


Contains the host-dependent port 
(HDP) number for EMS. If the 
PATHOUTBOARDF value is 1, 
this field is O (meaningless). For 
HDUs, this field is not applicable. 


Is not applicable for EMS. For 
HDuUs, it contains the port 
number. 


Is not applicable for EMS. For 
HDuUs, it contains the HDP 
number. 


Contains the address of the base 
on the line expansion module 
(LEM). 


Contains the address of the DLP 
in the base. 
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Word 5 of each path entry contains the name of the base in which the DLP resides. 
Word 5 is formatted as follows: 


Field Name Description 
[47:48] BASENAMEF Is not applicable for EMS and 
contains the base name for 
HDUs. 
[15:08] BASEMAINTBUSADDRF Contains the maintenance bus 


number of the base. This field is 
not applicable for HDUs. 


[7:04] BASEMAINTBUSNUMF — Contains the maintenance bus 
number of the bus. This field is 
not applicable for HDUs. 


[3:04] BASEEXTUNITNUMF . Contains the extension unit 
number of the base. This field is 
not applicable for HDUs. 


Word 6 of each path entry contains the outboard host name if the path is through an 
outboard host. Word 6 is formatted as follows: 
Field ’ Name Description 


[47:48] OUTBOARDF . Contains the external unit name 
of the outboard host. 


SUBTYPE 5 retrieves information by device number for a designated list of ports, 
controllers, and DCPs. For SUBTYPE 5, the MASK parameter selects information as 
described in Table 6-2. 


Table 6-2. Information Returned for SUBTYPE 5 Calls 


MASK Bit Description 


Index of path information for the unit. Refer to the information in “I/O 
Path Information” in this section. 


Contents of MCP UNIT word. Bits [47:06] contain the UNITTYPE code 
(refer to the SYSTEMSTATUS Reference Manual). The 


UNITTYPE code is related to the file KIND attribute. For ODT units, bit 
(22:01] is turned on if the ODT is restricted. 


Contains 1 if the unit is ready or is assigned to a process. Refer to MASK 
bit 3. 


if the unit is assigned to a single process, the stack number of that 
process. 


continued 
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Table 6-2. 


Information Returned for SUBTYPE 5 Calls (cont.) 


Description 


MASK Bit : 


For HYPERchannel units: 


Bits [47:08] contain the READPARTNER address. 

Bits [39:08] contain the READPARTNER log address. 

Bits [31:08] contain the WRITEPARTNER address. 

Bits [23:08] contain the WRITEPARTNER log address. 

Bit [14:01] is turned on if the unit is reserved. 

Bit [13:01] is turned on if HYFILES partners have restrictions. 
Bit [12:01] is turned on if the unit is for BNA. 


Bits [11:04] contain the bit MASK of available trunks. Bit 11 is 
trunk 0, and so forth. 


Bits [7:08] contain the adapter number. 


For host control (HC) units: 


Bits [36:05] contain 0 or the READPARTNER number plus 1. 
Bits [28:05] contain 0 or the WRITEPARTNER number plus 1. 


Bit [23:01] is turned on if there are restrictions on the HCFILES 
HUBNUMBER value. 


Bit [22:01] is turned on if the unit is for BNA. 
Bits [12:02] contain the mode code: 

- 0=CLOSED 

- 1=IN 

- 2=0UT 

- 3=10 

Bits [19:04] contain the HUBNUMBER value. 
Bits [15:16] contain the HUBINDEX value. 


General Results Returned for SUBTYPE 0, 1, 2, 5, 20, and 21 Calls 


GETSTATUS returns one of two kinds of result words in the array ARY for each unit 


that is reported. 


~ Soft Error Word 


If the GSERRORF bit ([47:01]) of the word is turned on, an error prevented 
GETSTATUS from reporting on the unit. This bit distinguishes a soft error word from a 
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unit info pointer word. The GSERRORVALUEF field ([46:08]) contains the soft error 
code (refer to Appendix B). 


Unit Info Pointer Word 
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A unit info pointer word points to the information for the unit, file, or volume mounted 
on the unit and contains a code for the unit kind that identifies the unit, file, or volume 


mounted on the unit. Unit info pointer words are structured as follows: 


GSERRORFF [47:01] 

The bit is OFF. 

GSVALUEF [38:06] 

This field contains the value 1. 
XSLINKF [82:17] 


If this field is not 0, the value is the index or base of the validity mask, and the 
attribute list returned for the unit follows the validity mask in the array ARY (refer 
to Figure 6-1). This field will not be 0 if the MASK parameter has any bits other _ 
than bit [0:01] turned on. 


GSUTYPEF [15:08] _ 


This field contains the code for the UNITTYPE or KIND of unit. (See Appendix C 
for a list of unit type codes.) 


Figure 6-1 is a diagram of the information pointed to by the unit info pointer word. 
BASE is the value contained in the XSLINKF field of the unit info pointer word. 


BASE BASE +1 BASE +2 BASE +N 


Validity : on 
Mask Length 
Linked ; 

Information for Information 
MASK Bit @ 

Information for 
Information for MASK Bit N 
MASK Bit 1 


Figure 6-1. Information Pointed to by the Unit Info Pointer Word 


A bit that is turned on in the validity mask corresponds to bits in the MASK parameter 
that are turned on for information that was successfully retrieved. 
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Each word after the validity mask for which the corresponding validity mask bit is 
turned on is either the file attribute or status information retrieved or is a link to the file 
attribute or status information retrieved. 


The variable-length linked information follows the last word referenced by the validity 
mask. GETSTATUS places information in this area for items described in the MASK 
table (Tables 6-1 and 6-2) with the phrase link to. Given the value of the link word, the 
caller can locate the linked information with an index calculated with one of the following 
formulas: 


INDEX := ARY [BASE + (MASK bit number + 1)].XSLINKF + BASE; 
INDEX := (link word) .XSLINKF + BASE; 


XSLINKF = [82:17] and INDEX is the word index that locates the beginning of the 
information. For example, the link word for a disk pack family name (MASK bit 10) is 
contained in ARY [BASE + 11]. | 


SUBTYPE 0 and 20 Calls (List by Unit Number) 


SUBTYPEs 0 and 20 retrieve information for a specific list of one or more units by 

unit number. SUBTYPE 0 can be used for all kinds of units, including disks and packs. 
SUBTYPE 20 can be used only for disks and packs, but a SUBTYPE 20 call retrieves _ 
some extra information for disks that a SUBTYPE 0 call does not include. 


Input 


For both SUBTYPEs 0 and 20, the caller should store in ARY [0] the index plus 1 of the 
last unit number designated. Beginning in word ARY [1], the caller should store two 
words in the array ARY for each unit for which information is to be retrieved. Each pair 
of words should be as follows: 


e First word 


[38:06] should contain a 1. 


[15:08] should contain the UNITTYPE code for the unit.. (See Appendix C for a list 
of unit type codes.) 


e Second word, ADDLWORD(1) 
This word contains the unit number. 


Results Returned 


GETSTATUS replaces the first word of each UNITTYPE/unit number pair with either 
a soft error word (with bit [47:01] turned on) or a unit info pointer word. If the array 
does not have enough room for GETSTATUS to return all the requested information, 
GETSTATUS either returns a hard error Boolean result (not enough room to report the 
first requested unit) or turns on bit [47:01] of ARY [0] and stores in ARY [0].[19:20] the 
index plus 1 of the last UNITTYPE/unit number pair that was processed. 
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SUBTYPE 1 and 21 Calls (Units within a aDestenated 
Range of Numbers) 


6-16 


SUBTYPEs 1 and 21 retrieve information for the units within a designated range of unit 
numbers. SUBTYPE 1 can be used for all kinds of units, including disks and packs. 
SUBTYPE 21 can be used only for disks and packs, but a SUBTYPE 21 call retrieves 
some extra information that a SUBTYPE 1 call does not include. 


Input 


SUBTYPEs 1 and 21 make use of the SUBCLASS parameter. If SUBCLASS is plus 
or minus 0, a unit is not reported unless it is either ready, assigned to a process, or 
rewinding. If SUBCLASS is plus or minus 1, units are reported even if they are not 
ready or in use. 


For SUBTYPEs 1 and 21, the caller should set up the array ARY as follows: 


e ARY [0] 


This word indicates how many units can be reported. ARY [0] should contain the 
index plus 1 of the last word in the array into which GETSTATUS can store a unit 
number. But note that for each unit reported, GETSTATUS uses two words. 


e = ARY [2] 

This word should contain the beginning unit number minus 1. 
e ARY [3] 

This word should contain the last unit number plus 1. 
e ARY [4] . 


This field should contain a unit kind selector mask. A unit is not reported by 
GETSTATUS unless the bit that corresponds to the UNITTYPE of the unit is 
ON in the selector mask in ARY [4]. The correspondence of selector mask bits to 
UNITTYPE is as follows: 


Bit 0 corresponds to UNITTYPE 1 (memory disk), bit 1 corresponds to UNITTYPE 
2 (ODT or SPO), and so on. UNITTYPE 0 is never reported. (See Appendix C for a 
list of unit type codes.) 


Results Returned 


Beginning at ARY [1] up to ARY [ARY [0] -1], GETSTATUS stores two words for each 
unit selected, according to the SUBCLASS, the beginning and ending unit numbers, and 
the folded UNITTYPE mask. The first word is either a soft error word or a unit info 
pointer word. The second word contains the unit number. Each unit info pointer word 
points to the information requested by the MASK parameter. GETSTATUS stores that 
information in the array ARY beginning at the word indexed by ARY [0]. If there are 
not enough words available in the array to report any. units or if ARY [0] is less than 

3, a hard error is returned. Otherwise, GETSTATUS changes the index contained in 
ARY [0] to be the index plus 1 of the word containing the last unit number processed. If 
there were not enough words in the array to report all the information available for all 
the requested units or if there were not enough words reserved between ARY [1] and 
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ARY [ARY [0] -1] to store all the requested unit info pointer words and unit numbers, 
GETSTATUS turns on bit [47:01] in ARY [0]. 


SUBTYPE 2 Calls (All Units Assigned to a Designated Process) 


SUBTYPE 2 retrieves information for all units of designated kinds that are assigned to a 
designated process. 


Input 


SUBTYPE 2 reports on all units of designated kinds that are assigned to a designated 
stack number. Notice that some units, such as disk units, are not assigned to a stack 
even though a process stack might have files open on the unit. Input for SUBTYPE 2 is 
as follows: 


e ARY [0] 


The value in this field indicates the number of units to report. The field should 
contain the index plus 1 of the last word in the array into which GETSTATUS can 
store unit info pointer words. 


e ARY [1] 
Bits [15:16] should contain the stack number. 


Bits [40:25] should contain a unit kind selection mask. A unit is not reported by 
GETSTATUS unless the bit that corresponds to the folded UNITTYPE of the unit is 
ON in the selector mask in ARY [1]. The correspondence of selector mask bits to 
UNITTYPE is as follows: Bit 0 of the selector mask (bit 16 of ARY [1]) corresponds 
to UNITTYPEs 1 and 33, bit 1 of the selector mask (bit 17 of ARY [1]) corresponds 
to UNITTYPEs 2 and 34, and so on. UNITTYPEs 0, 26 through 32, and 48 through 
63 are never reported. (See Appendix C for a list of unit type codes.) 


Results Returned 
’ GETSTATUS returns results as follows for SUBTYPE 2: 


e Ifahard error is detected, GETSTATUS returns a Boolean value of TRUE with the 
nonzero hard error code in bits [11:08] of the Boolean result. 


e Ifthe stack number is not valid, a soft error word is stored in ARY [1]. | 


Otherwise, unit info pointer words, soft error words, or both are stored beginning in 
ARY [1] and continuing up to (at most) ARY [ARY [0] -1]. The unit info pointer words 
point to the information requested by the MASK parameter bits. This information is 
stored in the array beginning at word ARY [ARY [0] ]. If there are not enough words 
available to return all the information for all the designated units, GETSTATUS turns 
on bit [47:01] of ARY [0]. Before returning, GETSTATUS stores in ARY [0].[19:20] the 
index plus 1 of the last word in which a unit info pointer word has been stored. 
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SUBTYPE 5 Calls (Specific List of Ports or Controls) 


SUBTYPE 5 retrieves information for a specific list of one or more port or control units 
by unit number. This call corresponds to the OL CTL <device number list> and OL 
PORT <port number list> system commands. 


Input 


For SUBTYPE 5, the caller should store in ARY [0] the index plus 1 of the last unit 
number designated. Beginning in word ARY [1], the caller should store two words in the 
array ARY for each unit for which information is to be retrieved. Each pair of words 
should be as follows: 


e First word 


[38:06] should contain a 1. 


[15:08] should contains the UNITTYPE code for the unit. (See Appendix C for a list 
of unit type codes.) 


e Second word, ADDLWORD(1) 
This word contains the unit number. 


' Results Returned 


GETSTATUS replaces the first word of each UNITTYPE/unit number pair with either a 
soft error word (with bit [47:01] turned on) or a unit info pointer word. If there is not 
enough room in the array for GETSTATUS to return all the requested information, 
GETSTATUS either returns a hard error Boolean result (not enough room to report the 
first requested unit) or turns on bit [47:01] of ARY [0] and stores in ARY [0].[19:20] the 
index plus 1 of the last UNITTYPE/unit number pair that was processed. 


SUBTYPE 6 Calls (Reserved) 


6-18 


GETSTATUS unit requests of SUBTYPE 6 are reserved for internal product 
development. Do not perform GETSTATUS calls of this subtype, and do not use this 
GETSTATUS subtype in local patches. 


Caution 


Improper GETSTATUS calls of SUBTYPE 6 can cause an unintended halt/load. 
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section 7 
General Information on SETSTATUS 


The SETSTATUS intrinsic provides the interface for control of MCP mix, unit, and 
operational functions from an object program. The SETSTATUS intrinsic can be called 
only by a DCALGOL MCS or a DCALGOL user program executing under a privileged 
usercode or a privileged program. 


This part of the manual describes calls you can make with SETSTATUS intrinsic that 
are the equivalent of selected system commands. Each call corresponds to the system 
command of the same name unless otherwise noted. Refer to the A Series System 
Commands Operations Reference Manual for detailed information about the system 
commands. 


The SETSTATUS intrinsic is referenced as a type Boolean procedure with four 
parameters: 


RSLT := SETSTATUS (TYPE, SUBTYPE, VAL, ARRAYROW) ; 


The TYPE, SUBTYPE, and VAL parameters are single-precision, REAL variables. 
ARRAYROW is a single-precision, REAL array row. The appropriate value for each 
parameter varies in each case. However, for all SETSTATUS calls, element [0] of 
ARRAYROW must be an integer greater than or equal to 2. 


SETSTATUS Request Types 


SETSTATUS functions are grouped into major categories by Request Type. The 
Request Type categories currently implemented are as follows: 


Request Type Description 


1) Mix requests. These requests set information about processes in the 
system. 


Reserved. 


Miscellaneous requests. 


Reserved. 


& WD HN 


Volume library requests. These requests set information about disk and 
tape volumes from the volume library and the volume directory. 


5 Unit requests. These requests set information about peripheral I/O units. 
Each Request Type category is further broken down into specific SUBTYPEs for 


obtaining specific information. These SUBTYPEs are discussed in detail as part of the 
explanation for each Request Type. 
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Unless otherwise indicated, the process that is called must have been initiated from an 
ODT or must be privileged to use Request Types 0, 2, or 5. Unless otherwise indicated, a 
nonprivileged process can use Request Type 4. 


Errors and Results : 


The Boolean result returned by SETSTATUS is used to indicate two types of error: a 
hard error or a soft error. If SETSTATUS does not find any errors, it returns a value of 
FALSE. 


A hard error indicates that the SETSTATUS request was incorrectly formed and 

that SETSTATUS was unable to complete it. An example of a hard error message is 
“INVALID VALUE IN TYPE.TYPEF”, which means that an invalid Request Type was 
designated. After a hard error is detected, the SETSTATUS request is aborted. 


A soft error indicates that SETSTATUS was unable to perform part of the original 
request, although some action might have been taken. An example of a soft error 
message is “INVALID NUMBER” (soft error 10), which means that an invalid mix 
number was designated or an invalid processor number was designated, and so forth. 
When a soft error is detected, SETSTATUS proceeds to the next request in the current 
invocation for multiple requests, or SETSTATUS returns to the calling program. 


If either a hard or soft error has occurred, bit 0 of the result is turned on. Bits (11: 8] 
indicate the hard error. If bits [11:8] are 0, a soft error has occurred. 


To determine which soft error or errors have occurred, you must examine the returned | 
array. The following algorithm describes the required search: 


INX := 1; 
LASTINX := A [@].[19:28]; 
DO BEGIN 
IF BOOLEAN (A [INX].[47:01]) THEN 
%Found a soft error 
%Soft error number in A [INX].[46:88] 
HANDLE_SOFT ERROR (A [INX].[46:98]); 
INX := * + 1 + A [INX]. [38:06]; 
END UNTIL INX GEQ LASTINX; 


This process retrieves all soft errors found in the call by SETSTATUS. 

Refer to Appendix A for a list of hard errors and Appendix B for a list of soft errors. 
For some calls, SETSTATUS does not complete the processing of the request itself. 
Instead, it starts an independent system process to finish the request. In these cases, 
SETSTATUS returns to the calling program before the process finishes. SETSTATUS 


does not report the success or failure of the independent process. An example would be 
the SETSTATUS DD (Directory Duplicate) call. 
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Names 


Parameters and results for some SETSTATUS calls use substandard form names. A 
substandard form name is a one-byte binary character count followed by the EBCDIC 
characters of the name. Parameters and results for other SETSTATUS calls use 
standard form names. Standard form names are coded in binary with lengths and 
codes. For more details about standard form names, refer to the information on the 
DISPLAYTOSTANDARD function in the DCALGOL Reference Manual. 
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SETSTATUS Request Type 0 (Mix Entries) 


You can use Request Type 0 SETSTATUS calls to pass information to processes in the 
mix or to change the status of processes in the mix. Most of these calls correspond to a 
system command and are arranged alphabetically by name. 


The following is a summary list of Request Type 0 calls: 


Call Name 
AX 
DO 
DS 


FA 


FM 


FR 


LG 


LP 


OF 


OK 
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SUBTYPE 
12 
19 

2 

8 


21 


25 


10 


25 


27 
20 


22 


Description 

Passes text to a program 

Turns diagnostic options on or off 
Terminates designated jobs and tasks 


Invokes the program dump procedure for 
designated programs 


Assigns a new or changed value to one or more file 
attributes of a task in the mix number list 


Restarts a program that has been suspended 
because it has tried to open a file whose FORMID 
attribute is turned on 


Designates that the input tape reel just read by a 
tape is the final reel of an unlabeled tape file 


Starts scheduled jobs or tasks 


Causes the EXCEPTIONEVENT task attribute to be 
invoked and optionally assigns a number to the 
TASKVALUE attribute of the task 


Designates that the file requested by a program 
resided on the designated unit, regardless of the 
label of the unit , 


Controls selective logging of designated tasks 


Enters message text into the job log and system log 
for the jobs or tasks designated in the mix number 
list 

Prevents the DS (Discontinue) and QT (Quit) 
system commands from terminating a designated 
task © 


Causes the task designated by the mix number to 
proceed without the optional file 


Reactivates tasks if they have been suspended or 
stopped for some reason. 


continued 
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continued 

Call Name SUBTYPE Description 

OU 25 Directs output from the designated task to a 
designated output device or to any available device. 
of the designated type 

PR 9 Assigns the priority of jobs or tasks 

QT 3 | Terminates the printing or punching of a backup 

file 

RESTART 28 Discontinues and restarts a set of active jobs 

RM 7 Responds to a “DUP LIBRARY” message 

SM 13 Sends a message to an MCS or a database 

STOP yz Instructs a DCALGOL program running under a 

privileged usercode to stop a task. 

THAW 4 Changes the status of a frozen library from 
permanent to temporary 

UL 25 Responds to a “NO FILE” message 


All mix type requests use the array parameter to designate the mix numbers of the 
process or processes to be acted on. As an optional safety check, the caller can also 
supply the usercode of the process to be affected. If the process that corresponds to 

a mix number given in the array does not have the designated usercode, the system 
returns soft error 10 (“INVALID NUMBER”). You can supply a usercode by turning on 
bit [47:01] of the TYPE parameter and placing the usercode in substandard form in the 
last three words of the array parameter A. 


General Format for Array A 


The following describes a general format of array A for Request Type 0 (Mix Request) 


SETSTATUS calls: 
ARRAYROW Description 
A{O] | Length of valid information contained in A; 1 plus the length 
of the mix number list in words. 
A{1] through A[A[0]-1] List of mix numbers. 


The layout of each entry in the list of mix numbers is as follows: 


ARRAYROW Description 

A{n).[15:16] Mix number. 

A{n}.[31:08] | Unit type (if applicable). 

A{n].{38:06] Number of words that follow as part of the current entry. 
The extra words for a mix entry are called ADDLWORDs. 

A([n+1]. through 0 or more ADDLWORDs for A[n]—for example, the unit 

A{A[n}.[38:06]] number. 
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For certain mix request SETSTATUS calls, special information should appear right after 
the last word used by the mix number list. For example, for an AX ee oe call, the text 
response should start at word A[A[0]]. 


Common Soft Errors for Mix Requests 


SETSTATUS can return the following soft error values if the mix number does not 
reference an executing visible process: 


Soft Error Number Message 
1 | IMPROPER STACK STATE 
10 INVALID NUMBER (This message can be caused by one of the 


following reasons: 
e The mix number is not in the range 1 through 9999. 
e There is not a process with that mix number. 


e = If bit [47:01] of the TYPE parameter is turned on, either the 
usercode of the process does not match the usercode passed to 
SETSTATUS in the array parameter A, or the process referenced 
by the mix number is an MCS.) 


78 INVALID STACK TYPE (The mix number refers to a DBS, and either 
. bit [47:01] of the TYPE parameter is turned on or the call is not a 
DS, LB, or SS SUBTYPE.) 


79 INVISIBLE STACK 


Examples of Mix Requests 


The following show examples of input for two Request Type 0 calls. 


Request Type 0, SUBTYPE 27 (LG call) 
For the system command 3456,5678 LG, use the following input: 


A[@] := % Length of request 
Afi] <= % First mix number 
@ (38: ai % No additional words for this entry 
A[2] := 6 & Bore i193 16] % Second mix number 
% No additional words for this entry 
RSLT : = SETSTATUS (@, 27, 8, A); 


co 
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Request Type 0, SUBTYPE 25 (UL call) 


For the system command 6609 UL MT 30, use the following input: 


A[@] := 3; % Total length of request 
A[1] := @ & 6689 [15:16] % Mix number 
& 13 [31:98] % Tape 
& 1 [38:96]; % One more word 
A[2] := 38; % Unit number 
RSLT := 


SETSTATUS (@, 25, 2, A); 
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AX Call 


Use the AX call to pass text to a program. This transfer of text can be in response to, or 
in anticipation of, a task that is requesting an ACCEPT message. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 0 

SUBTYPE 12 

VAL 9 

ARRAYROW Designates the mix number of the task and the ACCEPT task: 


e AO] = Pointer to length of text 

e A{1] through A[A[O}-1] = Mix number list 
e AT[A[O}} = Length of text in characters 

e A(A(O]+1] through end = Text 


Call 


RSLT := SETSTATUS (®, 12, @, A); 


Results 


SETSTATUS does not return any unique soft errors for this call. However, 
SETSTATUS can return hard errors 41 or 42 for an incorrectly structured array 
parameter or text string. 


Examples 
For the system command 1852 AX, use the following input: 


23 

1852; 

8; 

8; 

SETSTATUS (@, 12, 8, A); 


A(@] : 
A(1] : 
A[2] : 
A[3] : 
RSLT : 


For the system command 2223 AX STOP PROCESSING, use the following input: 


A[@] := 2; 
A[1] := 2223; 

A[2] := 15; 

REPLACE POINTER (A[3]) BY "STOP PROCESSING"; 
RSLT := SETSTATUS (@, 12, @, A); 


2: 
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For the system command 6131,6132 AX OK, use the following input: 


A[@] : 
A[1] : 
A[2] := 6132; 

A[3] := 23 

REPLACE POINTER (A[4]) BY "OK"; 
RSLT := SETSTATUS (8, 12, 8, A); 


3; 
6131; 
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DO Call 


Use this call to turn various diagnostic options on or off. This call is only vue on A 12 
and A 15 machines. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE o 

SUBTYPE 19 

VAL O = Turn off diagnostic options. 


1 = Turn on diagnostics options. 
ARRAYROW A[O] = 

A[1] = 0 & 1 [38:6] 

A(2}.[45:1] = 1 (ADS option) 

A[2].[11:1] = 1 (DRH option) 

A[2}.[10:1] = 1 (DDC option) 


For detailed information about the previously mentioned options ADS, DRH, and DDe 
refer to the System Commands Reference Manual. 


Call 


RSLT := SETSTATUS (@, 19, VAL, A); 


Results 


This call can return soft error 98 (“NO TEST JOB”). 


Examples 


For the system command DO + ADS, use the following input: 


A[@] := 3; 

A[1] := 8&1 [38:6]; 

A(2] := 9&1 [45:1]; 

RSLT := SETSTATUS (8, 19, 1, A); 


For the system command DO - DDC, use the following input: 


A[@] := 33 

Ai] := @ & 1 [38:6]; 
A(2] := © & 1 [18:1]; 
RSLT := SETST 


STATUS (@, 19, 8, A); 
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DS Call 


Use this call to terminate designated jobs and tasks. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 0 

SUBTYPE 2 

VAL 0 

ARRAYROW ALO] = Length of request 


A{1] through ALA[O]-1] = Mix number and option list. The mix 
number list contains one or two words for each mix number 
designated. These words are formatted as follows: 


e A{n) = Mix number. If [38:6] equals 1, ADDLWORD A[n+1] 
contains the DS options for Afn]. 


@ A(n+1).[ 7:1] = BASE 

e A(n+1].[ 8:1] = ARRAYS 

e A(n+1).[ 9:1] = CODE 

e = A(n+1).[10:1] = FILES 

e = A(n+1).[11:1] = PRESENT ARRAYS 
e = Af{n+1).[15:1] = DBS 

e = A(n+1).[18:1] = SIBS 

e = A(n+1).{19:1] = LIBRARIES 

@ A({n+1}.[20:1] = PRIVATELIBRARIES 


e Al(n+1].[47:1] = If this bit is turned on, it causes the 
designated options to be combined with options already turned 
on by the task. The net result controls the program dump. 


Call 


RSLT := SETSTATUS (8, 2, @, A); 


Results 


This call can return the following soft errors: 


Soft Error Number Message 

1 IMPROPER STATE 

102 ; NOT DSED, LIBRARY NOT RESUMABLE 
105 . NOT DSED, NETWORK SERVICES LIBRARY 


continued 
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continued 
Soft Error Number _ Message 
106 NOT DSED, HOST SERVICES LIBRARY 
135 LOCKED PROGRAM 

Examples 


For the system command 3451 DS, use the following input: 


A[@] := 2; 
A[1] := 3451; 
RSLT := SETSTATUS (@, 2, @, A); 


For the system command 3451, 7890 DS * , CODE, BASE, use the following input: 


A[@] := 5; 


A(1] := 3451 & 1 [33:1]; 
A[2] := 6 & 1 [7:1] 
| & 1 [9:1] 
& 1 [47:1]; 
A(3] := 7898 & 1 [33:1]; 
A(4] := @ & 1 [7:1] 
& 1 [9:1] 
& 1 [47:1]; 
RSLT := SETSTATUS (8, 2, @, A); 
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' DUMP Call 


Use this call to invoke the program dump procedure for the designated programs. You 
can also designate that the program dump be invoked with specific options. 


On a system with the InfoGuard security enhancements, when the 
PROGDUMPFILTER option is turned on, the dump contains only that data that belongs 
to the environment of the dumping program. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 0 

SUBTYPE 8 

VAL 0 

ARRAYROW A[0] = length of request 


A(1], through A{A[O0}-1] = Mix number and option list. The mix _ 
number list contains one or two words for each mix number 
designated. These words are formatted as follows: 


Call 


A{n} = Mix number. If A[n].[38:06] equals 1, ADDLWORD 
A[n+1] contains the DUMP options for A[n]. 


-A(n+1].0 1:1] = FAULT 


A(n+1).[ 2:1] = DSED 

A(n+1).[ 7:1] = BASE 

A{n+1].[ 8:1] = ARRAYS 

A(n+1).{ 9:1] = CODE 
A(n+1].[10:1] = FILES 
A(n+1].[15:1] = DBS 
A(n+1).[18:1] = SIBS 
A(n+1].[19:1] = LIBRARIES 
A{n+1).[20:1] = PRIVATELIBRARIES 


Aln+1].[47:1] = If this bit is turned on, it causes the 
designated options to be combined with options already turned 
on by the task. The net result controls the program dump. 


RSLT := SETSTATUS (8, 8, @, A); 


Results 


SETSTATUS does not return any unique soft errors for this call. 
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Examples 
For the system command 3451 DUMP, use the following input: 
2 ° 


3451; 
SETSTATUS (@, 8, @, A); 


A[@] : 
A[1] : 
RSLT 


For the system command 3451, 7890 DUMP DSED, ARRAYS, use the following input: 


A[@] := 5; 
A[1] := 3451 & 1 [33:1]; 
A(2] := 2&1 [2:1] 
&1 [8:1]; 
A[3] := 7890 & 1 [33:1]; 
A[4] := @ & 1 [2:1] 
& 1 [8:1]; 
RSLT := SETSTATUS (8, 8, @, A); 
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FA Call 
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Use this call to assign a new or a changed value to one or more file attributes of a task in 
the mix number list. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 0 

SUBTYPE 21 

VAL 0 

ARRAYROW A[O] = Index of the word in the array that contains the length of the 


file attribute assignments 

A{1] through A[A[O]-1] = Mix number list 

A{A{O]] = Length of the file attribute assignments in characters 
A[A[0]+1] through end = File attribute assignments 


Call 


RSLT := SETSTATUS (@, 21, 9, A); 


Results 


This call can return the following soft errors: 


Soft Error Number Message 
2 INVALID REPLY (The process was not expecting the FA reply.) 
3 NO REPLY NEEDED (The process was not expecting a reply.) 
101 WFL NOT INITIATED 
113 INV ATTRIBUTE LIST 

Examples 


For the system command 7890 FA VERSION = 12, CYCLE = 13, use the following input: 


A[@] := 23 
A[1] := 7899; 
A[2] := 28; 


REPLACE POINTER (A[3], 8) BY "VERSION=12, CYCLE=13"; 
RSLT := SETSTATUS (@, 21, 9, A); 


8600 0346-000 


SETSTATUS Request Type 0 (Mix Entries) 


For the system command 3456 5678 FA TITLE = OBJECTIA, use the following syntax: 


A({@] := 3; 
A[1] := 3456; 
A[2] := 7898; 
A[3] := 14; 


REPLACE POINTER (A[4], 8) BY "TITLE=OBJECT/A"; 
RSLT := SETSTATUS (@, 21, 8, A); 


8600 0346-000 , | 8-13 


SETSTATUS Request Type 0 (Mix Entries) 


FM Call 


Use this call to restart a program that has been suspended because it tried to open a file 
whose FORMID attribute is turned on. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 
ARRAYROW 


Value or Description 

0 

25 

1 

A[O] = Length of request 

A(1] through A[A[0]-1] = List of mix numbers and units 


The following is the layout of each request entry: 


Array A 
A(n]}.[33:01] 
A[n].[31:08] 
Ain].[15:16] 
A[n+1] 


Call 


Description 

i 

Unit type (refer to Appendix C) 
Mix number 


Unit number 


RSLT := SETSTATUS (@, 25, 1, A); 


Results 


SETSTATUS returns the following soft errors for this call: 


Soft Error Number 


8-14 


Message 

INVALID REPLY (The process was not expecting the FM reply.) 
NO REPLY NEEDED (The process was not expecting a reply.) 
UNIT NOT READY | 

UNIT CORRESPONDENCE (Invalid unit type designated.) 
INVALID UNIT NUMBER 


8600 0346-000 


SETSTATUS Request Type 0 (Mix Entries) 


Example 
For the system command 1234 FM LP4, use the following input: 


A[@] := 3; 


A[1] := 1234 & 1 [38:06] & 7 [31:98]; 
A[2] := 4; 
RSLT := SETSTATUS (@, 25, 1, A); 


8600 0346-000 8-15 


SETSTATUS Request Type 0 (Mix Entries) | 


FR Call 


Use this call to designate that the input tape reel just read by a process is the final reel of 
an unlabeled tape file. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 0 

SUBTYPE 6 

VAL 0 

ARRAYROW A[O] = Length of request 


A[1] through A[A[O}-1] = Mix number list 
Call 
RSLT := SETSTATUS (8, 6, 8, A)3 


Results 


SETSTATUS returns the following soft errors for this call: 


Soft Error Number Message . 

2 INVALID REPLY (The process was not expecting the FR reply.) 

3 NO REPLY NEEDED (The process was not expecting a reply.) 
Example 


For the system command 4567 FR, use the following input: 


A[@] := 2; 
A[1] := 4567; 
RSLT := SETSTATUS (8, 6, @, A); 


8-16 8600 0346-000 


SETSTATUS Request Type 0 (Mix Entries) 


FS Call 


Use this call to start scheduled jobs or tasks, provided that enough memory is available. 
Note that the FS call cannot start a WFL job that is still in the job queue. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 0 
SUBTYPE 0 
VAL 0 


ARRAYROW A{O] = Length of request 
| A{1] through A[A[0}-1] = Mix number list 
Call 


RSLT := SETSTATUS (@, @, @, A); 


Results — 


SETSTATUS returns soft error 1 (“IMPROPER STACK STATE”) for this call if the 
process is not in the schedule. 


Example 
For the system call 9346 FS, use the following input: 
A[@] := 2; 


A[1] := 9346; 
RSLT := SETSTATUS (8, 8, @, A); 


8600 0346-000 8-17 


SETSTATUS Request Type O (Mix Entries) 


HI Call 


Use this call to cause the EXCEPTIONEVENT of a task to take place and, optionally, to 
assign a number to the TASKVALUE attribute of the task. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 0 

SUBTYPE 10 

VAL 0 
ARRAYROW A{O] = Length of request 


A[{1] through A[A[0}-1] = Mix number and task value list. Each 
entry in the list consists of one or two words. The first word of an 
entry (A[n]) contains the mix number. If A[n].[38:06] equals 1, the 
ADDLWORD A[n+1] contains the new task value for A[n]. 


Call 


RSLT := SETSTATUS (8, 19, O, A); 


Results 


SETSTATUS can return soft error 1 (“IMPROPER STATE”) for this call. 


Examples 


For the system command 1234 HI, use the following input: 


A[@] : 
A[1] : 
RSLT : 


2; 
1234; 
SETSTATUS (8, 18, 8, A); 


For the system command 2468, 1357 HI 6, use the following input: 


A[@] := 5; 
A[1] := 2468 & 1 [38:86]; 
A[2] := 63 
A[3] := 1357 & 1 [38:86]; 
A(4] := 6; 


RSLT SETSTATUS (8, 19, 9, A); 


8-18 8600 0346-000 


IL Call 


SETSTATUS Request Type 0 (Mix Entries) 


Use this call to designate that the file requested by a program resides on the designated 
unit, regardless of the label of the unit. 


Input 


Use the following input for this call: 


Parameter 


TYPE 
SUBTYPE 
VAL 


ARRAYROW 


Call 


Value or Description 

0 

25 

0 

A(O] = Length of request 

A[1} through A{A[O}-2] = Mix number list 
A[A[O]-2].[38:06] = 1 

A[A[O]-2].[31:08] = Unit type (refer to Appendix C) 
ALA[O}-1] = Unit number 


RSLT := SETSTATUS (@, 25, @, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number 


31 


Example 


Message 

INVALID REPLY (The process was not expecting the IL reply.) 
NO REPLY NEEDED (The process was not expecting a reply.) 
UNIT NOT READY | 

UNIT CORRESPONDENCE (Invalid unit type designated.) 
INVALID UNIT NUMBER 


For the system command 1234 IL MT 29, use the following input: 


A[@] := 


A[1] : 
A[2] : 
RSLT : 


8600 0346-000 


1234 & 1 [38:96] & 13 [31:98]; 


SETSTATUS (@, 25, 8, A); 


8-19 


SETSTATUS Request Type 0 (Mix Entries) 


LG Call 


Use this call to control selective logging of designated tasks. This call is available only if 
you have InfoGuard security enhancement software on your system. 


8-20 


If security administrator status is authorized on your system, only a security 
administrator usercode can invoke this call. If security administrator status is not 
authorized on your system, any privileged user can invoke this call. 


Input 


Use the following input for this call: 


Parameter 


TYPE 
SUBTYPE 
VAL 


ARRAYROW 


Call 


Value or Description 

0 

27 

0 

A[O] = Length of request 


A[1] through A[A[O]—-1] = Mix number and log code value list. Each 
entry in the list consists of one or two words. The first word of an 
entry (A[n]) contains the mix number. If A[n],{38:06] equals 1, the 
ADDLWORD Alin + 1] contains the new log code value for A[n]. 


RSLT := SETSTATUS (8, 27, 8, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number 


221 
229 


230 


254 


Example 


Message 


REQUEST DENIED. SECADMIN USERCODE REQUIRED 
SYSTEM HAS NO INFOGUARD AUTHORIZATION — HALT/LOAD TO 


-INSTALL INFOGUARDSUPPORT 


SYSTEM HAS NO INFOGUARD AUTHORIZATION — 
INFOGUARDSUPPORT LIBRARY NOT SL-ED 


SYSTEM HAS NO INFOGUARD AUTHORIZATION 
—-INFOGUARDSUPPORT LIBRARY INITIALIZING 


For the system command 3456 LG 5, use the following input: 


A[@] := 3; 

A[1] := 3456 & 1 [38:86]; 

A[2] := 5; 

RSLT := SETSTATUS (8, 27, 9, A); 


8600 0346-000 


SETSTATUS Request Type 0 (Mix Entries) 


LJ Call 


Use this call to enter message text into the job log and system log (SUMLOG) for the 
jobs or tasks designated in the mix number list. 


This SETSTATUS call corresponds to the following system command: 


<mix number list> LJ <message text> 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 0 

SUBTYPE 20 

VAL 0 

ARRAYROW A{O] = Index of the word in the array that contains the length of the 


message in bytes 
A[1] through ALA[O]-1} = Mix number list 
A[A[0]] = Length of the message in bytes 
A[A[0]+1] through end = Message 

Call 


RSLT := SETSTATUS (8, 20, @, A); 


Results 


SETSTATUS does not return any unique soft errors for this call. 


Example 


For the system call 1234, 5678, 9876 LJ THIS IS A COMMENT, use the following input: 


A[@] := 4; 
A[1] := 1234; % 1st mix number 
A[2] := 5678; % 2nd mix number 
A[3] := 9876; % 3rd mix number 
A[4] := 173 


REPLACE POINTER (A[5]) BY “THIS IS A COMMENT” FOR 17; 
RSLT := SETSTATUS (8, 28, 8, A); 


8600 0346-000 8-21 


SETSTATUS Request Type 0 (Mix Entries) 


LP Call 


8-22 


Use this call to prevent or permit the DS (Discontinue) and QT (Quit) system commands 
from terminating a designated task. 


This SETSTATUS call with the VAL parameter greater than or equal to 0 corresponds 
to the following system command: 


<mix number list> LP 


This SETSTATUS call with the VAL parameter less than 0 corresponds to the following 
system command: 


<mix number list> LP - 


Input 


Use the following input for this call: | 


Parameter Value or Description 

TYPE 0 

SUBTYPE 22 

VAL Less than 0 = Unlocks the program (allows DS or QT) 


Greater than or equal to O = Locks the program (prevents DS or QT) 
ARRAYROW A{O] = Length of the request 
A[1]} through A[A[0}-1} = Mix number list 


Call 


RSLT := SETSTATUS (8, 22, VAL, A); 


Results — 


If a designated program already has the locked or unlocked state that was requested, 
soft error 4 (“ALREADY DONE”) is returned. 


SETSTATUS returns soft error 1 (“IMPROPER STATE”) if a designated program is 
not in the scheduled, active, suspended, or frozen state. 


Example 


For the system command 1234 LP, use the following input: 


A[@] := 2; 
A{1] := 1234; % mix number 
RSLT := SETSTATUS (@, 22, 1, A); 


8600 0346-000 


SETSTATUS Request Type O (Mix Entries) 


-NOTOK Call 


Use this call to answer “no” to certain RSVPs such as “SORT FILE FULL, OK TO 
EXPAND.” 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 0 

SUBTYPE 4 

VAL 1 

ARRAYROW A[O} = Length of request 


A(1] through A[A[0}+-1] = Mix number tist 


Call 


RSLT := SETSTATUS (®, 4, 1, A)3 


Results 


SETSTATUS returns the following soft errors for this call: 


Soft Error Number Message 

2 INVALID REPLY (The process was not expecting the NOTOK reply.) 

3 NO REPLY NEEDED (The process was not expecting a reply.) 

10 INVALID NUMBER (The mix number of the process was invalid.) 
Example 


For the system command 2378 NOTOK, use the following input: 


A[@] : 
Afi] : 
RSLT : 


25 
2378; 
SETSTATUS (8, 4, 1, A); 


8600 0346-000 . 8-23 


SETSTATUS Request Type 0 (Mix Entries) 


OF Call 


Use this call to cause the task designated by the mix number to proceed without the 
optional file. 


Input 


Use the following input for this call: 


Parameter Nalue or Description 
TYPE 0 

SUBTYPE 5 

VAL 0 

ARRAYROW A[O] = Length of request 


Al1] through A[A[O]—1] = Mix number list 


Call 


RSLT := SETSTATUS (8, 5, 8, A); 


Results 


If a soft error occurs, bit [47:1] of A[1] will be turned on and bits [46:8] of A[1] will 
contain a soft error number. Possible soft error numbers include the following: 


Soft Error Number Message 

2 INVALID REPLY (The process was not expecting the OF reply.) 

3 NO REPLY NEEDED (The process was not expecting a reply.) 

10 INVALID NUMBER (The mix number of the process was invalid.) 
Example 


For the system command 2573 OF, use the following input: 
2 ° 


25733 
SETSTATUS (8, 5, 8, A); 


- A[@] : 
A[1] : 
RSLT : 


8-24 8600 0346-000 


SETSTATUS Request Type 0 (Mix Entries) 


OK Call 


Use this call to reactivate tasks if they have been suspended or stopped for some reason. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 0 

SUBTYPE 4 

VAL | 0 

ARRAYROW ALO] = Length of request 


A[1] through A[A[O]-1] = Mix number list 


Call 


RSLT := SETSTATUS (@, 4, @, A); 


Results 


SETSTATUS returns the following soft errors for this call: 


Soft Error Number Message 

2 INVALID REPLY (The process was not expecting the OK reply.) 

3 NO REPLY NEEDED (The process was not expecting a reply.) 

10 INVALID NUMBER (The mix number of the process was invalid.) 
Example 


For the system command 2378 OK, use the following input: 


A[@] := 23 
A[1] := 2378; 
RSLT := SETSTATUS (8, 4, @, A); 


8600 0346-000 8-25 


SETSTATUS Request Type 0 (Mix Entries) 


OU Call 


Use this call to direct output from the designated task to a designated output device or 
to any available device of the designated type. ) 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 0 

SUBTYPE 25 

VALUE 3 

ARRAYROW A[O] = Length of request 


A{1} through A[A[1}-1] = List of mix numbers and units 


The layout of each request entry is as follows: 


Array A Value or Description 

A{n]}.[33:1] 1 

A(n].[31:8] Unit type (refer to Appendix C) 

Afn).(15:16] Mix number 

A(n+1] Unit number (0 if unspecified) 
Call 


RSLT : = SETSTATUS(®, 25, 3, A); 


Results 


The unit designated by the unit number must be online and ready. If a soft error 
occurs, bit [47:1] of A[1] is turned on and bits [46:8] of A[1] contain a soft error number. 
Possible soft error numbers include the following: 


Soft Error Number Message 
2 _ INVALID REPLY (The process was not expecting the OU reply.) 
3 | l NO REPLY NEEDED (The process was not expecting a reply.) 
~ 10 INVALID NUMBER (The mix number of the process was invalid.) 
15 UNIT NOT READY 
28 UNIT CORRESPONDENCE (The unit type was invalid.) 
31 INVALID UNIT NUMBER 


8-26 8600 0346-000 


SETSTATUS Request Type 0 (Mix Entries) 


Example 
For the system command 2917 OU MT 49, use the following input: 


A[@] := 3; 


A[1] := @ & 2917 [15:16] & 15 [31:8] & 1 [38:6]; 
A[2] := 49; 
RSLT := SETSTATUS (8, 25, 3, A); 


8600 0346-000 8-27 


SETSTATUS Request Type 0 (Mix Entries) © 


PR Call 


Use this call to assign the priority of jobs or tasks. Any changes made by this command 
are not preserved after a halt/load occurs. The value of the priority must be in the range 
from 0 to 99. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 0 

SUBTYPE .9 

VAL 0 

ARRAYROW _A[O] = Length of request 


A[1] through A[A[O]-1] = Mix number entry list. The layout of each _ 
pair of words used for a mix number entry is as follows: 


e = AfnjJ,[15:16] = Mix number. 
e A{n].[38:06] = 1 
e Al(n + 1] = Priority value. 


Call 


RSLT := SETSTATUS (@, 9, @, A); 


Results 


This call can return soft error 10 (“INVALID NUMBER”) because the priority value 
specified is out of range (0 to 99) or the mix number is invalid. 


Example 


For the system command 1234 PR 55, use the following input: 


A[@] := 3: 

A[1] := 1234 & 1 [38:96]; 

A[2] := 55; 

RSLT := SETSTATUS (8, 9, 8, A); 


8-28 8600 0346-000 


SETSTATUS Request Type O (Mix Entries) 


QT Call 


Use this call to terminate the printing or punching of a backup file. The backup file is 
not removed from the directory. This command can be used only if the print tasks have 
not been locked with an LP system command or an LP SETSTATUS call. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 0 

SUBTYPE 3 

VAL 0 

ARRAYROW ALO] = Length of the request 
Al1] through A[A[O}-1] = Mix number list (one word for each mix 
number) 

Call 


RSLT := SETSTATUS (8, 3, 8, A); 


Results 


SETSTATUS can return soft error 135 (“LOCKED PROGRAM”) for this call. 


Example 


For the system command 2159 QT, use the following input: 


A{@] := 2; 
A{1] := 2159; ? 
RSLT := SETSTATUS(@, 3, , A); 


8600 0346-000 8-29 


SETSTATUS Request Type 0 (Mix Entries) 


RESTART Call 


Use this call to programmatically discontinue and restart a set of active jobs. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 0 

SUBTYPE 28 

VAL 0 


ARRAYROW ALO] = Number of mix entries plus 1 


A{1] through A[A[0]] = Mix numbers of the jobs that are to be 
restarted (one mix number per word) 


Call 


RSLT := SETSTATUS (@, 28, @, A); 


Results 


In result array A, SETSTATUS returns any errors that have occurred while the 
program was trying to restart ajob. Each word in the array contains the mix number 
and whether or not an error occurred while the mix was being processed. Bits [15:16] 
contain the mix number, bit [47:01] (ERRORF) marks an error condition, and bits 
[46:08] (ERRORVALUEF) indicate what the error was. 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

1 IMPROPER STACK STATE 

10 NOT A VALID NUMBER 

78 INVALID STACK TYPE 

79 INVISIBLE STACK 
Example 


For the SETSTATUS call 1234 RESTART, use the following input: 


A[@] : 
A[1] : 
RSLT : 


23 
1234; 
SETSTATUS (8, 28, 8, A); 


8-30 8600 0346-000 


SETSTATUS Request Type 0 (Mix Entries) 


RM Call 


Use this call to respond to a “DUP LIBRARY” message. The call removes the disk file 
designated in the message and retains the new file. | 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 0 

SUBTYPE 7 

VAL 0 

ARRAYROW A{0] = Length of request 


A{1] through A[A[O]-1] = Mix number list 


Call 


RSLT := SETSTATUS (8, 7, @, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

2 INVALID REPLY (The process was not expecting the RM reply.) 

3 NO REPLY NEEDED (The process was not expecting a reply.) 

10 INVALID NUMBER (The mix number of the process was invalid.) 
Example 


For the system command 1915 RM, use the following input: 


A[@] : 
A[1] : 
RSLT : 


23 
1915; . 
SETSTATUS (8, 7, 8, A)3 


8600 0346-000 8-31 


SETSTATUS Request Type O (Mix Entries) 


SM Call | 


Use this call to send a control command to an MCS or a database. | 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 0 

SUBTYPE 13 

VAL 0 

ARRAYROW ALO] = Length of request 


A{1] through A[A[0}-1] = Mix number list 
A[n] = Characters in message 


A[n+1] = Message 
Call 


RSLT := SETSTATUS (8, 13, 8, A); 


Results 


This call can return the following soft errors: 


Soft Error Number Message 

1 IMPROPER STACK STATE 

10 INVALID NUMBER 

74 DATACOM INACTIVE 

88 INVALID MCS 
Example 


For the system command 1234 SM QUIT, use the following input: 


A[@] : 
A[1] : 
A[2] :=4; 

REPLACE POINTER (A[3]) BY "QUIT"; 
RSLT := SETSTATUS (8, 13, 9, A); 


8-32 , 8600 0346-000 


SETSTATUS Request Type 0 (Mix Entries) 


STOP Call 


Use this call to instruct a DCALGOL program running under a privileged usercode to 
stop a task. This call has the same effect as the system command ST. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 0 

SUBTYPE 1 

VAL 0 

ARRAYROW A[O] = Length of request 


A(1] through A[A[0]}-1] = Mix number list 


Call 


RSLT := SETSTATUS (9, 1, 9, A); 


Results 


SETSTATUS returns the following soft error for this call: 


Soft Error Number | Message 
10 INVALID NUMBER (The mix number of the process was invalid.) 
Example 


For the system command 1234 STOP, use the following input: 


A[@] := 23 
A(1] := 1234; 
RSLT := SETSTATUS (@, 1, 9, A); 


8600 0346-000 8-33 


- SETSTATUS Request Type 0 (Mix Entries) 


THAW Call 


Use this call to change the status of a frozen library from permanent to temporary. A 
permanently frozen library remains in the mix regardless of whether or not any users 
are attached to it. A temporary library stays in the mix only as long as a user is attached 
to it. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 0 
SUBTYPE 4 
VAL 2 
ARRAYROW A[O] = Length of request 


A({1] through A[A[O]-1] = Mix number list 


QU 


Call 


RSLT := SETSTATUS (@, 4, 2, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

2 INVALID REPLY (The process was not expecting the THAW reply.) 

3 NO REPLY NEEDED (The process was not expecting a reply.) 

9 REQUEST DENIED (The process is not a frozen library.) 

10 . INVALID NUMBER (The mix number of the process is invalid.) 
Example 


For the system command 2378 THAW, use the following input: 


A[@] := 2; 
A[1] := 2378; 
RSLT := SETSTATUS (8, 4, 2, A); 


8-34 8600 0346-000 


SETSTATUS Request Type 0 (Mix Entries) 


~ UL Call 


Use this call in response to a “NO FILE” message. The call assigns an unlabeled file on 
an indicated unit to a task. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 0 

SUBTYPE 25 

VAL 2 

ARRAYROW ALO] = Length of request 


A{1] through A[A[0}-1] = List of requests 


The layout for each request entry is as follows: 


Array A Value or Description 

Aln).[31:08] Unit type (refer to Appendix C) 

Ain).[38:06] 1 

A{nj.[15:16] Mix number 

A{n + 1] Unit number 
SETSTATUS varies the value of n from1 by 2 until the value is greater than or equal to 
A(0]-1. 
Call — 


RSLT := SETSTATUS (8, 25, 2, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

2 INVALID REPLY (The process was not expecting a UL reply.) 

3. NO REPLY NEEDED (The process was not expecting a reply.) 

10 INVALID NUMBER (The mix number of the process was invalid.) 
15 UNIT NOT READY 

28 UNIT CORRESPONDENCE (An invalid unit type was designated.) 
31 INVALID UNIT NUMBER 


8600 0346-000 8-35 


SETSTATUS Request Type 0 (Mix Entries) 


Example 


For the system command 1234 UL MT 30, use the following input: 


A[@] : 
A[1] : 


3; 

@ & 1234 [15:16] & 1 [38:96] 
& 13 [31:88]; 

38; 

SETSTATUS (8, 25, 2, A); 


A[2] : 
RSLT : 


8-36 | 8600 0346-000 


section9 | 
SETSTATUS Request Type 2 
(Miscellaneous Requests) 


This section contains miscellaneous SETSTATUS calls. Most of these calls correspond to. 
a system command; they are arranged alphabetically by name. 


The following is a summary list of Request Type 2 calls: 


Cal! Name SUBTYPE Description 

ACCOUNTING 85 Sets systemwide attributes for dependent 
task accounting and file accounting. 

AD 20 Duplicates an active access structure or 
removes a duplicate structure. 

AR 24 Starts the ARCHIVEHANDLER utility. 

ARCCOPY 20 Makes an offline backup copy of the 
archive directory for a disk family. 

ARCDUPLICATE 20 — Creates a duplicate copy of an archive 


directory or deletes a duplicate copy of an 
archive directory. 


ARCREPLACE 20 Replaces with a designated replacement 
directory the current archive directory for 
a family. 

ASD 66 Allocates the factor that is used to 


calculate the size of the actual segment 
descriptor table at the next halt/load. 


AUTORESTORE 83 Designates or changes the value of the 
system AUTORESTORE archiving option. 
BNAVERSION 67 Designates the version of BNA to be 
brought up after the next halt/load. 
CF 38 Establishes or removes a configuration file 
; title from the system tables. 
CHANGE SYSTEMFILE 86 Permits you to change the SYSTEMFILE 
STATUS status of the file *SYSTEM/FAULTLOG. 
CM 6 Designates a new MCP. 
COMPILERTARGET 58 Establishes the default TARGET for the 
system. 
COPYCAT 20 | Creates a copy of the catalog. 
CP 8 Designates a code file as a control 
program. 
continued 
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SETSTATUS Request Type 2 (Miscellaneous Requests) 


9.2 


continued 


Cail Name 
cS 


DD 
DF 
DL 


DN 


DR 


DRC 


DUMP 
HLUNIT 
HOSTGROUP 


HOSTNAME 
HS 


HU 


INSERT IN SUPERVISOR 
QUEUE 


LC 
LOGGING 
MB 


MC 


SUBTYPE 
9 


20 


56 


43 


29 


15 


44 


52 


Description 


Designates a code file as a supervisor 
program or cancels a supervisor program. 


Creates or deletes a backup copy of the 
system directory. 


Transfers memory dumps from the 
dumpdisk file to a dumpfile or to tape. 


Designates that system files reside on a 
family other than the hait/load family. 


Controls the creation and assignment of 
the disk file used for the system memory 
dumps to disk. 


Changes the system date used by the 
MCP (use only for old programs). 


Controls disk space usage on a per user 
basis. 


Dumps the entire contents of memory. 
Designates a new halt/load unit. 


Allocates the name of the host group to be 
used after the next halt/load. 


Establishes a host name to take effect 
after the next halt/load. 


Stops or resumes initialization of new jobs 
or tasks. 


Designates a usercode for certain BNA 
Host Services requests if they come from 
an ODT that has no terminal usercode 
assigned to it. 


Initializes data comm, allocates data 
comm prefixes, allocates network support 
processor (NSP) audit options, and 
terminates data comm. 


Inserts messages in the supervisor input 
queue. 


Enters a comment in the system log. 
Changes the system logging options. 


Makes a designated BOOTCODE file 
usable for initialization or removes the 
eligible status of a BOOTCODE file. 


Designates a code file asa compiler code 
file or removes compiler status from a 
code file. 


continued 
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continued 
Call Name 


MESSAGESUPPORT 
Initialization 


MP 
MU 


NETWORK INITIALIZATION 
AND TERMINATION 


NETEX 


OP 
PB 


PP 
RB 

RECONFIGURE 
RES 

RESTRICT 
RESTRICT VOLUME 
RO 

RP 

SB 


SBP 


SECOPT 
SEGARRAYSTART 


SF 
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SUBTYPE 
83 


84 
10 


80 


60 


55 


Description 
Initializes the MESSAGESUPPORT library. 


Associates an identity with a program. 


Causes a designated usercode to be 
entered in the USERDATAFILE as a valid 
usercode. 


Initiates or terminates operation of BNA - 
Version 1 and BNA Version 2. The call 
also can designate the NETINIT file to use. 


Initiates and terminates NETEX and 
optionally designates the NETEX init file. 


Turns on or off MCP run-time options. 


Prints or punches backup disk or tape 
files. 


Designates the privilege status of a code 
file as privileged, privileged transparent, or 
nonprivileged. 


Causes the MCP to build a new access 
structure for the system directory or the 
catalog. 


Regroups hardware resources. 


Allows an area to be returned to disk pack 
tables. 


Turns on or off any security-related 
restrictions. 


Turns on or off any security-related 
restrictions on volumes. 


Turns off various system options. 


Makes a code file resident. 


Substitutes one backup medium for 
another. 


Displays and sets the time interval used | 
for computing system utilization 
information. 


Allocates the security options word for the 
system. 


Allocates the array size beyond which the 
MCP segments an array by default. 


Changes the memory management 
parameters for the system. 


continued 
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continued 

Call Name _ SUBTYPE Description 

Sl . 5 Changes the code file used for system 
intrinsics. 

SL 75 Maps function names to library code files. 

SO 0 Turns on various system options. 

SQUASH 12 Moves in-use areas on disk so as to 
reduce fragmented disk allocation and to 
create larger available areas. 

$s 19 Sends a message to data comm stations. 

SUPPRESS 8 Prevents jobs or tasks from appearing in a 
mix display when they are active. 

SUPPRESSWARNING 78 Modifies the list of warning messages that 
the system can display. 

SUSPEND/RESUME 37 Suspends or resumes processes of 


DCALGOL programs running under 
privileged usercodes. 


SYSTEMLANGUAGE 65 Designates the default language to be 
used for system messages. 


TL 22 | Releases the current system log file and 
starts a new one. 


TR 14 Changes the system time of day or date 
used by the MCP. Use the enhanced 
version of this call for new programs and 
to designate or change the time zone. 


XD 12 Eliminates from the available disk table 
any defective segments on disk. 
XP 8 Marks a nonexecutable unsafe code file as 
an executable unsafe code file, or the 
reverse. 
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Use the AD call to request duplication of directories or the catalog. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 


ARRAYROW 


Value or Description 

2 

20 

1 = For the command AD (<number>). 

1 & 1 [10:1] = For the command AD- <family> (<number>). 
1 & 1 [10:1] & 1 [39:1] = For the command AD- (<number>). 


Used to designate the family index number, the family name, and 
the file name. For possible details of this parameter, refer to the 
information that follows. 


Use the following array values for AD and AD- without a family name: 


Array A 

A[0] 

Afi] 

A[3] 

A[4], A[5], A[6] 


Value or Description 
3 

Family index 

0 


Should contain 0 


Use the following array values for AD- with a family name: 


Array A 
A[0] 
AQ] 
A[3] 
A[4], A[5}, A{6] 


Call 


Value or Description 
3 

Family index 

18 


Family name in substandard form 


RSLT := SETSTATUS (2, 20, 1, A); 


Results 


If SETSTATUS does not find any errors in the request, a value of FALSE is returned 
to RSLT. This value means that an independent system process was started to process 
the request. The success or failure of that process is not reported by SETSTATUS. If 
SETSTATUS does detect an error with the request, bit [0:1] of the RSLT is turned 
on. If a soft error occurred (REAL (RSLT) IS 1), bit A [1].[47:1] is turned on and bits 
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A [1].[46:8] contain the soft error code. Possible soft error values for the AD call include 


the following: 
Soft Error Number Message 
60 | INVALID PARAMETER INDEX 
63 PARAMETER LENGTH ERROR 
69 INVALID VALUE 
81 . FIVE CHARS REQ 
82 INVALID STANDARD FORM 
Example 


For the system command AD-(3), use the following input: 


A[@] := 3; 
A[1] <= 3; 
A[3] := @3 

REPLACE POINTER (A[4]) BY @ FOR 18; 

RSLT := SETSTATUS (2, 20, 1 & 1 [10:1] & 1 [39:1], A); 
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AR Call 


Use this call to start the utility ARCHIVEHANDLER, which releases an old archive log 
and creates a new one. When the archive log is full (about 60,000 records), the MCP 
automatically releases it. When the archive log is released, it is crunched and marked as 
a nonsystem file. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE . Ps 

SUBTYPE 24 

VAL 0 

ARRAYROW Designates the optional file title 


Use the following array values for an AR call without a file title: 


Array A Value or Description 
A [0] 2 
A[1] 0 
A[2] 0 


Use the following array values for an AR call with a file title: 


Array A Value or Description 

A{[0] 2 

A{l]} 0 

A [2] through end File title in standard form 
Call 


RSLT := SETSTATUS (2, 24, 8, A); 
Results 
If SETSTATUS does not find any errors in the request, a value of FALSE is returned to 
RSLT and an independent system process is started to process the request. The success 
or failure of that process is not reported by SETSTATUS. If SETSTATUS does detect 
~ an error with the request, bit [0:1] of the RSLT is turned on. Ifa soft error occurred 


(REAL (RSLT) IS 1), bit A [1].[47:1] is turned on and bits A [1].[46:8] contain the soft 
error code. Possible soft error values for SETSTATUS AR include the following: 


Soft Error Number Message 
60 INVALID PARAMETER INDEX 
63 PARAMETER LENGTH ERROR 


continued 
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continued 

Soft Error Number Message 

81 FIVE CHARS REQ 

82 INVALID STANDARD FORM 
Examples 


For the system command AR, use the following input: 


A[@] := 2; 
~ A(1] := @; 

A[2] := @; 

RSLT := SETSTATUS (2, 24, @, A); 


For the system command AR *ARCHIVELOG/011889/141100 ON PACK, use the 
following input: 


A[@] := 2; 

A[1] := @; 

REPLACE POINTER (A[2]) BY 48"219683", 
48"GA" "ARCHIVELOG", 
48"86" "911889", 
48"06" "141188", 
48"94" "PACK"; 

RSLT := SETSTATUS (2, 24, @, A); 
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ARCCOPY Call 


Use this call to make an offline backup copy of the archive directory for a disk family. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 20 

VAL 4. 

ARRAYROW Designates the family name and the file title under which the copy is 
to be made 


Use the following array values: 


Array A Value or Description 

A[0} 3 

A[1] The family index of the disk to which the copy is to be made. The 
range can be from 1 through 255. 

A (4) through A [6] The name (in substandard form) of the disk family whose archive 
directory is to be copied. 

A([7] through end The file title under which the directory is to be copied. 

Call 


RSLT := SETSTATUS (2, 28, 4, A); 


Results 


SETSTATUS returns errors if the family index, family name, or file title are not 
properly formed. If there are no errors, SETSTATUS starts the independent runner 
COPYDIR and returns. COPYDIR proceeds to copy the archive directory for the 
designated family to the designated file. 
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Example 


For the system command ARCCOPY WORKPACK *BACKUP/WORKPACK ON DISE, 
use the following input: 


A[@]) := 3; 
A[1] := 1; %OUTPUT FAMILY INDEX 
% INPUT FAMILY NAME "WORKPACK" 
REPLACE POINTER (ARY [4]) BY 48"@8", 8"WORKPACK"$ 
%OUTPUT FILETITLE = "*BACKUP /ARCHI VE/WORKPACK/@01 ON DISK" 
REPLACE POINTER (ARY [7]) BY 48"249685", 
48"@6", 8"BACKUP", 48"87", 8"ARCHIVE", 
48"98", S"WORKPACK", 48"93", 8"@@1", 
48"94", 8"DISK"s; 
RSLT := SETSTATUS (n, 28, 4, A); 
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ARCDUPLICATE Call 


Use this call to create a duplicate of an archive directory or to delete a duplicate of an 
archive directory. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 20 

VAL 5 (for creating a new duplicate) 


5 & 1 [10:01] (for deleting an existing duplicate) 
ARRAYROW Designates the family name and the family index. 


Use the following array values: 


Array A Value or Description 
A[0] 3 
Afl] The family index of the disk to which the copy is to be made. The 


range can be from 1 through 255. 


A [4] through A [6] The name (in substandard form) of the disk family whose archive 
directory is to be copied or deleted. 


Call 


RSLT := SETSTATUS (2, 28, VAL, A); 


Results 


SETSTATUS returns errors if the family index or family name are not properly formed. 
If there are no errors, SETSTATUS starts the independent runner COPYDIR and 
returns. COPYDIR proceeds to copy or to delete the duplicate archive directory as 
requested. 


Examples 
For the system command ARCDUPLICATE WORKPACK (2), use the following input: 


A[@] := 3; 

A(1] := 2; %NEW FAMILY INDEX 

% FAMILY NAME “WORKPACK" 

REPLACE POINTER (ARY [4]) BY 48"98", 8"WORKPACK"; 
RSLT := SETSTATUS (2, 28, 5, A); 
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For the system command ARCDUPLICATE - WORKPACK (1), use the following input: 


A[@] := 3; 

A[1] := 1; %FAMILY INDEX TO DELETE 

% FAMILY NAME “WORKPACK" 

REPLACE POINTER (ARY [4]) BY 48"98", 8"WORKPACK"; 
RSLT := SETSTATUS (2, 208, 5 & 1 [18:1], A); 
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ARCREPLACE Call 


Use this call to replace the current archive directory for a family with a designated 
replacement directory. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 20 

VAL 6 

ARRAYROW Designates the family name and the replacement directory file title. 


Use the following array values: 


Array A Value or Description 

A [0] 3 

A(i]} 1 

A [4] through A [6] The family name (in substandard form). 

A[7] through end Directory file title in standard form. 
Call 


RSLT := SETSTATUS (2, 28, 6, A); 


Results 


SETSTATUS returns errors if the family name or directory name are not properly 
formed. If there are no errors, SETSTATUS starts the independent runner COPYDIR 
and returns. COPYDIR proceeds to activate the replacement directory and close the old 
archive directory for the family. 


Example 


Use the following input for the system command ARCREPLACE WORKPACK 
BACKUP/ARCHIVE/WORKPACK/001: 


A[@] := 3; 
A(1] := 1; 
% FAMILY NAME "WORKPACK" 
REPLACE POINTER (ARY [4]) BY 48°98", 8"WORKPACK"; 
% SUBSTITUTE FILENAME = "BACKUP/ARCHIVE/WORKPACK/@91" 
REPLACE POINTER (ARY [7]) BT 48"1F9194", 
48"96" 8"BACKUP, 48"97", 8"ARCHIVE", 
48"8", 8"WORKPACK", 48°93", 8"901"; 
RSLT := SETSTATUS (2, 28, 6, A); 
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ASD Call 


Use this call to designate the factor that is used to calculate the size of the actual 
segment descriptor (ASD) table at the next halt/load. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 66 

VAL 0 

ARRAYROW User array at least four words long: 
@ Af{0}=4 
e A{i]=0 


e A[2] = Value of factor 


e A[3] = Memory size or 0 & 1 [47:01] if memory size is not to 
be changed 


Call 


RSLT := SETSTATUS (2, 66, 9, A); 


Results 


SETSTATUS returns soft error 10 (“INVALID NUMBER’) if A [2] or A [3] is out of 
range. 


Example 


For the system command ASD 60, use the following input: 


A[@] := 4; 

A[2] := 69; 

A[3] := @& 1 [47:91]; 

RSLT := SETSTATUS (2, 66, @, A); 
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AUTORESTORE Call 


Use this call to designate or change the value of the system AUTORESTORE archiving 
option. 


Input 


Use the following input for this call: 


Parameter Value or Description 
-TYPE 2 
SUBTYPE 83 
VAL | 0 = DONTCARE 
1 = NEVER 
2 = YES 
ARRAYROW A(O] =2 
A[1] = 0 
Call 


RSLT := SETSTATUS (2, 83, VAL, A); 


Results 


SETSTATUS returns soft error 69 if VAL is not in the range 0 to 2. 


Examples 
For the system command AUTORESTORE YES, use the following input: 
A[@] : 


A[1] : 
RSLT : 


23 
8; 
SETSTATUS (2, 83, 2, A); 
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BNAVERSION Call 


Use this call to designate the version of BNA to be brought up after the next halt/load. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 67 

VAL 0 

ARRAYROW A[O] = 2 
A{1} = Next BNA version (1 for BNA Version 1 and 2 for BNA 
Version 2) 

Call 


RSLT := SETSTATUS (2, 67, @, A); 


Results 


SETSTATUS can return the following soft errors if VAL is not equal to 1 or 2: 


Soft Error Number Message 

10 INVALID NUMBER 

69 INVALID VALUE 
Example 


For the system command BNAVERSION = BNAV2, use the following input: 


A[@] := 2; 
A[1] := 2; . 
RSLT := SETSTATUS (2, 67, @, A); 
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CF Call 


Use this call to establish or remove a configuration file title from the system tables. The 
designated file is not used until the system is reconfigured with the RECONFIGURE 
system command. You must have SECADMIN status to execute this call. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 38 

VAL . 0 = Removes designation of the configuration file 


1 = Establishes the configuration file 


ARRAYROW ALO] = 2 
| A(2] through end = Standard form file title if VAL = 1 or O if 
VAL = 0. 
Call 


RSLT := SETSTATUS (2, 38, VAL, A); 


Results 


If the name of the configuration file is too long, soft error 59 (“NAME TOO LONG”) 
might be returned. 


Example 
For the system command CF *SYSTEM/CONFIG/FILE, use the following input: 


A[@] := 2; 

REPLACE POINTER (A[2]) BY 48"169283", 

| 48"26" 8"SYSTEM", 
48"96" 8"CONFIG", 
48"94" 8" FILE"; 

RSLT := SETSTATUS (2, 38, 1, A); 
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CHANGE system file STATUS Call 


Use this call to change the system file status for the file *SYSTEM/FAULTLOG. 
(Normally, a disk file marked as a system file cannot be removed or have its name 
changed.) 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE ' 86 

VAL 0 if system file = FALSE 
1 if system file = TRUE 

ARRAYROW A[0] = 2 


A[2] = *SYSTEM/FAULTLOG 


Call 


RSLT := SETSTATUS (2, 86, VAL, A); 


Result 


No unique soft errors are returned for this call. 


Example 


If you do not want the file *SYSTEM/FAULTLOG ON PACK to be a system file, use 
following input: 


A[@] := 2; 

A[1] := @; 

REPLACE POINTER (A[2]) BY "*SYSTEM/FAULTLOG ON PACK."; 
RSLT := SETSTATUS (2, 86, 9, A); 
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CM Call 


Use this call to designate a new MCP on either the current halt/load family or another 
family. You can also use this call to remove a pending CM request or to remove a CM 
designation from the non-halt/load family. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 6 

VAL = Cancels a pending CM designation for the current halt/load 
amily 


1 = Establishes the CM designation 
2 = Establishes the temporary CM designation 
4 = Removes the CM designation from a family 
ARRAYROW ALO] = 2 
A[2] through end = Standard form name (not used if VAL = 0) 
Call 


RSLT := SETSTATUS (2, 6, VAL, A); 


Results 


This call can generate the following soft errors: 


Soft Error Number Message 
| REQUEST DENIED (Returned if a CM is already in progress for the. 
current halt/load family when another CM is attempted for that 
same family.) 
82 INVALID STANDARD FORM (An invalid standard form name was 
supplied.) | 
Examples 


For the system command CM - ON TESTDISK, use the following input: 


A[@] := 23 

REPLACE POINTER (A[2]) BY 48"9C919498", 
"TESTDISK"s 

RSLT := SETSTATUS (2, 6, 4, A); 
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For the system command CM *SYSTEM/MCP ON TESTDISK, use the following input: 


A[@] := 2; 
REPLACE POINTER (A[2]) BY 48"179603", 
. 48"96" 8"SYSTEM", 
48"g3" 8"MCP", 
48"98" 8"TESTDISK"; 
RSLT := SETSTATUS (2, 6, 1, A); 
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COMPILERTARGET Call 


Use this call to establish the default TARGET for the system. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 2 

SUBTYPE 58 

VAL 0 

ARRAYROW ALO] = 2 


A{1] = 0 & CLASS [4:5] 
A{2] = PRIMARY_ID 


CLASS can have one of the following values: 


Number Value 

1 LEVELO 

2 B7900 

3 LEVEL1 

4 LEVEL2 
PRIMARY ID, the internal system designation of a particular system, can take one of 
the following values: 

System Value 

MicroA 20 

Al 16 

A2 | 

A3 5 

A4 19 

A5 10 

A6é 

AQ 

A10. 9 

Al2 15 

A15 7 

Al7 17 


You can make the call either by designating a machine type such as A 1 or AQ or by 
designating a level such as LEVELO, which is similar to the COMPILERTARGET system 
command. 
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- Use the following values to designate a LEVEL: 


LEVEL Designations 

LEVELO Set TARGET_CLASS to 1, PRIMARY_ID to -1. 
LEVEL1 Set TARGET_CLASS to 3, PRIMARY_ID to -2. 
LEVEL2 Set TARGET CLASS to 4, PRIMARY_ID to -3. 


Use the following values to designate a specific machine type: 


Machine Type Designations 

A9,A10 Set TARGET_CLASS to 3, PRIMARY_ID to 
A9orA 10 ID (6 or 9). 

MicroA and all other A Series systems Set TARGET_CLASS to 4, PRIMARY_ID to ID 


from previous table. 


Call 


RSLT := SETSTATUS (2, 58, @, A); 


Results 
SETSTATUS does not return any unique soft errors for this call. Exercise caution when 


you use this command, because no checking is done on the validity of machine type as 
compared to level. 


Examples 


For the system command COMPILERTARGET AY, use the following input: 


A[@] := 2; 

A[1] := @ & 3 [4:5]; % TARGET CLASS 3 
A[2] := 6; % MACHINE ID OF AQ 
RSLT := SETSTATUS (2, 58, @, A); 


For the system command COMPILERTARGET MICROA, use the following input: 


A[@] := 2; 
A(1] := 0 8 4 [4:5]; % TARGET CLASS 4 
A[2] := 203 % MACHINE ID OF MICROA 


RSLT := SETSTATUS (2, 58, ®, A); 


For the system command COMPILERTARGET LEVELI, use the following input: 


A[@] := 
A{1] := a 5 3 [4:5]; % LEVEL1 HAS TARGET CLASS OF 3 
A[2] := % NO MACHINE ID DESIGNATED, BUT LEVEL = 1 


RSLT : eee (2, 58, @, A); 
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COPYCAT Call 


Use the COPYCAT call to create a duplicate copy of the catalog. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 2 

SUBTYPE 20 

VAL 3 

ARRAYROW A[O] = 3 


Call 


A({1] = Family index or 0 


A{3] through A [48] = Contains the new file title in standard form 
with usercode and family name if required 


RSLT := SETSTATUS (2, 29, 3, A); 


Results 


If SETSTATUS does not find any errors in the request, a value of FALSE is returned to 
RSLT. Possible soft error values for COPYCAT calls include the following: 


Soft Error Number Message 
60 INVALID PARAMETER INDEX 
63 PARAMETER LENGTH ERROR 
69 INVALID VALUE 
81 FIVE CHARS REQ 
82 INVALID STANDARD FORM 
Example 


For the system command COPYCAT *BACKUP/CAT ON SYSPACK, use the following 


input: 
A[@] := 3; 
A[1] := 9; 
REPLACE POINTER (A[3]) BY 48"169693" % 22 CHAR FILETITLE 


48"96" "BACKUP" 48"93" "CAT" 48"97" "SYSPACK"; 


_ RSLT := SETSTATUS (2, 28, 3, A); 
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CP Call 


Use the CP call to designate a code file as a control program. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 


ARRAYROW 


Call 


Value or Description 
2 
8 


O = Changes the status of a control program to that of not being a 
control program 


1 = Changes a program into a control program 
A[O] = 2 
A[2] through end = File title in standard form 


RSLT := SETSTATUS (2, 8, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number 


255 


Example 


Message 

PREVIOUSLY DONE (File does not need to be changed.) 

INVALID FILE TYPE (File is not properly structured.) 

NO FILE (File is not present.) 

INVALID PARAMETER INDEX (Index name is too large.) 
PARAMETER LENGTH ERROR (Length of name is too large.) 

FIVE CHARS REQ (Standard form name is badly formed.) 

INVALID STANDARD FORM (Standard form name is badly formed.) 


CODEFILE INCOMPATIBLE WITH THIS MCP VERSION (File is not 
properly structured.) 


For the system command CP *MYPROGRAM, use the following input: 


A[@] := 2; 


REPLACE POINTER (A[2]) BY 48"9D@20199" 8"MYPROGRAM" ; 
RSLT := SETSTATUS (2, 8, 1, A); . 
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CS Call 


Use this call to cancel a supervisor program or to designate a code file as a supervisor 
program. » 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 9 

VAL O = Cancels a supervisor program 


1 = Establishes a supervisor program 


ARRAYROW A(O] =2 . 
A([2] through end = File title in standard form (not used if VAL = 0) 


Call 


RSLT := SETSTATUS (2, 9, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 
8 INVALID FILE TYPE (file is not properly structured) 
49 NO FILE (File is not present.) 
60 INVALID PARAMETER INDEX (Index name is too large.) 
63 PARAMETER LENGTH ERROR (Length of name is too large.) 
81 FIVE CHARS REQUIRED (Standard form name is badly formed.) 
82 INVALID STANDARD FORM (Standard form name is badly formed.) 
255 CODEFILE INCOMPATIBLE WITH THIS MCP VERSION (File is not 
properly structured.) 
Example 


For the system command CS *OUR/SOUP, use the following input: 


A[@] := 2; 

REPLACE POINTER (A[2], 8) BY 48"9C®29203" 8"OUR" 
48"4" 8"SOUP"; 

RSLT := SETSTATUS (2, 9, 1, A); 
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DD Call 


Use the DD call to delete a duplicate directory or catalog. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 


ARRAYROW 


Call 


Value or Description 
2 
20 


O = For the command DD <family> (<number>) 


O & 1 [10:1] = For the command DD - <family> 
(<number>) . 


A[O] = 3 
A[1] = Family index 
A[3] = 18 


A[4] through A[6] = Family name in substandard form 


RSLT := SETSTATUS (2, 20, VAL, A); 


Results 


If SETSTATUS does not find any errors in the request, a value of FALSE is returned 
to RSLT. This value means that an independent system process was started to process 
the request. The success or failure of that process is not reported by SETSTATUS. If 
SETSTATUS does detect an error with the request, bit [0:1] of the RSLT is turned on. 
If a soft error occurred (REAL (RSLT) IS 1), bit A [1].[47:1] is turned on and bits A 
[1].[46:8] contain the soft error code. Possible soft error values for the DD call include 


the following: 
Soft Error Number 
60 
63 
69 
81 
82 
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Message 

INVALID PARAMETER INDEX 
PARAMETER LENGTH ERROR 
INVALID VALUE 

FIVE CHARS REQ 

INVALID STANDARD FORM 
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Example 


For the system command DD DATAPACK (5), use the following input: 


A[@] := 3; 
A[1] := 5; 
A[3] := 18; 


REPLACE POINTER (A[4]) BY 48"98" "DATAPACK";. 
RSLT := SETSTATUS (2, 20, @, A); 
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DF Call 


Use this call to transfer memory dumps from the dumpdisk file to a dumpfile or to tape. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE Z 
SUBTYPE 56 
VAL O = If DF with a file name 
1 = IF DF without a file name 
ARRAYROW A[O] = 2 
A{1] = 0 


A[2] through end = Optional file title in standard form 


Call 


RSLT := SETSTATUS (2, 56, @, A); 


Results 


This call can generate soft error 61 (“ALREADY RUNNING: A PRIOR EMPTY DUMP 
DISK FILE OPERATION HAS NOT YET COMPLETED”). 


Examples 
For the system command DF *SYSTEM/D UMP/FILE, use the following input: 


A[@] := 23 

REPLACE POINTER (A[2], 8) BY 48"148293", 
48"06" 8"SYSTEM", 
48"94" 8"DUMP", 
48"24" 8"FILE"; 

RSLT := SETSTATUS (2, 56, 8, A); 


For the system command DF, use the following input: 


A[@] : 
RSLT : 


23 
SETSTATUS (2, 56, 1, A); 
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DL Call 


SETSTATUS Request Type 2 (Miscellaneous Requests) 


Use this call to designate that system files reside on a family other than the halt/load 


family. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 
ARRAYROW 


Value or Description 
2 


43 


0 
Al0] = 2 

A[1].[ 0:1] = 1 % OVERLAY 
ALLL{ 1:1] = 1% LOG 

AU1I.{ 2:1] = 1% BACKUP 
AU1I[ 3:1] = 1 % USERDATA 
ALLL 4:1] = 1% JOBS 
ALLL 5:1] = 1 % CATALOG 
ACL. 6:1] = 1 % DPFILES 
ACL]. 7:1] = 1 % SORT 
ALI. 8:1] = 1 % IPFILES 


A(2] through A[5] = Family name in substandard form (for example, 
48'04" "DISK"). 


A[2] through A[5] = 0, Family name equals a period (.). Zero can 


be designated only when A[1].[6:1] is turned on. 


More than one bit in A [1] can be turned on. 


The following descriptions only apply to the MCP/AS systems when A[1].[0:1] is turned 


on: 
Array A 


A(2].[ 3:4) 


A[2].[ 9:6] 
A(2].[35:24] 
A[M*3+3] 
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Value or Description 

1 = Sectors per AREASIZE specified 

2 = DL OVERLAY + ON <family name> 
3 = DL OVERLAY - ON <family name> 
N = Number of the family names 

Sectors per AREASIZE 


Family name in substandard form, where M ranges from 0 to N-1. 
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Call 


RSLT := SETSTATUS (2, 43, @, A); 


Results 


This call can return the following soft errors: 


Soft Error Number ‘Message 

55 FAMILY NAME REQUIRED 

61 ALREADY RUNNING 

221 REQUEST DENIED: SECADMIN USERCODE REQUIRED 
Examples 


For the system command DL BACKUP ON MYPACK, use the following input: 


A[@] := 2; 

-A[1] := 6&1 [2:1]; 
REPLACE POINTER (A[2], 8) BY 48"06" "MYPACK"; 
RSLT := SETSTATUS (2, 43, 2, A); 


For the system command DL DPFILES, use the following input: 
A[@] := 2; 
A{1] := 8&1 [6:1]; 

REPLACE POINTER (A[2], 8) BY 48"90" FOR 18; 
RSLT := SETSTATUS (2, 43, 8, A); 
The following examples are only valid on MCP/AS systems. 


For the system command DL OVERLAY + ON DISK, ON USERPACK, use the 


following input: 
A[@] := 2; 
A[1] := @ & 1 [6:1]; 
A[2] 2=§ 9&2 [3:4] a 


& 2 [9:6];  % two family names specified 
REPLACE POINTER (A[3], 8) BY 48"94" "DISK"; 
REPLACE POINTER (A[6], 8) BY 48"98" "USERPACK"; 
RSLT := SETSTATUS (2, 43, @, A); 
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For the system command DL OVERLAY 504 ON DISK, ON USERS, ON PACK, use the 


following input: 
A[@] := 2; 
AQ1] := 9 & 1 [@:1]; 
A[2] := © & 1 [3:4] % Sectors per AREASIZE specified 
& 3 [9:6] % Three family names specified 


& 504 [35:24];  % Sectors per AREASIZE 
REPLACE POINTER (A[3], 8) BY 48"@4" "DISK"S$ 
REPLACE POINTER (A[6], 8) BY 48"85" "USERS"; 
REPLACE POINTER (A[9], 8) BY 48"04" "PACK"; 
RSLT := SETSTATUS (2, 43, @, A); 
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DN Call 


9-32 


Use this call to control the creation and assignment of the disk file used for the system 
memory dumps to disk. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 2 
SUBTYPE | 29 
VAL Number of units in 16K-word (from 16 to 2048) 
ARRAYROW A[O] = 2 
Afi] =0 


A{2] through end = File title in standard form. 
Call 


RSLT := SETSTATUS (2, 29, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 
55 FAMILY NAME REQUIRED 
59 NAME TOO LONG 
92 LOCK IN USE 
Example 


For the system command DN DUMPER ON DISK [128], use the following input: 


A[@] := 2; 

A[i] := @; 

REPLACE POINTER (B) BY “DUMPER ON DISK."; 
DISPLAYTOSTANDARD (POINTER (B), POINTER (A[2])); 
RSLT := SETSTATUS (2, 29, 128, A); 
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DR Call 


SETSTATUS Request Type 2 (Miscellaneous Requests) 


Use this call to change the system date used by the MCP 


Note: If you are using old programs, you can use this call. For new 
programs, use the enhanced version of the TR call described later in 
this section of the manual. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 
ARRAYROW 


' Call 


Value or Description 


2 

TS 

0 

A{O] = 6 
A[1].[38:6] = 4 
A[2} = Month 


A{3] = Day of month (From 1 to 28, 30, or 31) 
A(4] = Year (must be greater than 1900) 
A[5] = Day of week (Sunday = 0, Monday, = 1, and so on) 


RSLT := SETSTATUS (2, 15, 8, A); 


- Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number 
64 
65 
72 
76 
77 
92 
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Message 

INVALID DAY 

INVALID YEAR 

INVALID MONTH 

THREE WORDS REQUIRED 
INCOMPLETE ENTRY 


REQUIRED LOCK IN USE (If a date or time change is already 
running) 
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Example 


For the system command DR WEDNESDAY JANUARY 11, 1989, use the following 


input: 
A[@] := 6; 
Afi] := @ & 4 [38:96]; 
A[2] := 1; % January is the first month 
A[3] := 11; 
A[4] := 1989; 
A[5] := 3; % Wednesday is the third day 
RSLT := SETSTATUS (2, 15, @, A); 
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DRC Call 


SETSTATUS Request Type 2 (Miscellaneous Requests) 


Use this call to control disk space usage on a per user basis. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 


ARRAYROW 


Call 


Value or Description 
2 

79 

1=DRC + 

2 = DRC- 


3 = DRC LB OLDNAME = <family name> NAME = 
< family name> 


4 = DRC PG OLDNAME = <family name> 
For VAL 3 or 4, use the following: 

e AlO]=2 

e A{1]=0 


e A[2] = Size of the following family name (including size byte) in 
bytes 


e A(3] through A[5] = Family name (for OLDNAME) in 
substandard form 


For VAL 3, use the following: 


e A(6] = Size of following family name (including size byte) in 
bytes 


e A(7) through A[9] = Family name (for NAME) in substandard 
form 


RSLT := SETSTATUS (2, 79, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number 


58 


60 
63 
69 
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Message 


NOT ALLOWED (Tried to do DRC + while DRC — was in progress, or 


_ vice versa.) 


INVALID PARAMETER INDEX (Index name is too large.) 
PARAMETER LENGTH ERROR (Length of name is too large.) 
INVALID VALUE (VAL is not equal to 1, 2, 3, or 4.) 


continued 
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continued 
Soft Error Number Message 
82 INVALID STANDARD FORM (Standard form name is badly formed.) 
235 THE DRC SYSTEM IS NOT ACTIVE 

Example 


_ For the system command DRC +, use the following input: 


A[@] : 
A[1] : 
RSLT : 


23 
8; 
SETSTATUS (2, 79, 1, A); 


9-36 . 8600 0346-000 


SETSTATUS Request Type 2 (Miscellaneous Requests) 


DUMP Call 


Use this call to dump the entire contents of memory and supply the first 16 characters of 
text to appear as the reason for the dump. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 2 
SUBTYPE 1 
VAL 2 
ARRAYROW A(O] = 2 
Al1} = 0 


“A[2] = Length of the text 
A[3] through A{5] = Text 
A[6] = Code to indicate the extent of the memory dump 


Call 


RSLT := SETSTATUS (2, 1, 2, A); 


Results 


SETSTATUS does not return any unique soft errors for this call. 


Example 
For the system command DUMP LOOPING, use the following input: 


A[@] : 
A({1] : 
A[2] := 7; 

REPLACE POINTER (A[3], 8) BY "LOOPING"; 
RSLT := SETSTATUS (2, 1, 2, A); 


° 
9 


un ou 
a a 
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HLUNIT Call 


Use this call to designate new halt/load units. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 


ARRAYROW 


Value or Description 

2 

53 

O = If no processor mask is designated 

1 = If a processor mask is designated (A 10 only) 
A[O] = Length of request 


A(1] through A[A[0}-1] = List of halt/load units (refer to the 
information that follows) 


HDU machines (A 12 and A 15) need the following values for A: 


Array A 
ALAl].[29:06] 


A{AI+1] 


Description 
Unit type: 

e SC=1 
e PK=17 
e MT=13 
e LP=6 
Unit number 


Resource Management Module (RMM) machines (A 17) need the following values for A: 


Array A 
ATAI].[38:06] 


ALAII.(32:01] 
ALAII.{31:08] 
AAl+1] 
ALAI+2] 
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Description 


Entry size (number of extra words in this 
entry). 


Unit is the backup unit. 
Unit type (refer to Appendix C). 
Unit number. 


DLP or control number. 
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EMS machines need the following values for A: 


Array A Description 
ACAl).[15:16] Processor mask (bit mask of processors for 
this halt/ioad unit— A 10 only) 
ALAi+1] Unit number 
ALAI+2] DLP or CTL number 
Call 


RSLT := SETSTATUS (2, 53, @, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

9 REQUEST DENIED 

1S UNIT NOT READY 

22 NO 10 PATH 

2s CODE ERROR 

28 UNIT CORRESPONDENCE 

31 INVALID UNIT NUMBER 

41 INVALID UNIT TYPE 

52 UNIT NOT AVAILABLE 

58 NOT ALLOWED 

77 INCOMPLETE ENTRY 

151 BAD PROCESSOR ID 

183 PROCESSOR ID NOT ALLOWED 

185 SCP COULD NOT SET HL UNIT 
Examples 


For the system command HLUNIT PK 44 on an EMS machine, use the following input: 


A[@] := 23 
A[2] := 44; 
RSLT := SETSTATUS (2, 53, 8, A); 


For the system command HLUNIT PK 44 on an HDU machine, use the following input: 


A[@] := 23 
A{i] := @ & 17 [29:86]; 
A(2] := SETSTATUS (2, 53, @, A); 
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For the system command HLUNIT PK 44 on an RMM machine, use the following input: 


A[@] := 2 


A{1] := @ & 17 [31:06] & 1 [38:96]; 
A[2] := 44; 
RSLT := SETSTATUS (2, 53, 9, A); 
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HOSTGROUP Call 


Use this call to allocate the name of the host group to be used after the next halt/load. 
No corresponding system command exists for this call. 


A host group name can be from 1 to 17 characters long. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 69 

VAL Less than 0 = Makes the next host group name 0 
Greater than or equal to 0 = Sets the next host group to the name 
in ARRAY A 

ARRAYROW A[O] = 2 


A(1}.[47:08] = Index of the first word of the next host group 
ACAL1].[47:08]] = Next host group name in substandard form © 


Call 


RSLT := SETSTATUS (2, 69, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

59 NAME TOO LONG 

60 INVALID PARAMETER INDEX 
Example 


To erase any pending change in the host group name, use the following input: 


A[@] := 23 
A[1] := 83 
RSLT := SETSTATUS (2, 69, -1, A); ~ 
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HOSTNAME Call 


Use this call to establish a host name that will take effect at the time of the next 


halt/load. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 
ARRAYROW 


Call 


Value or Description 
2 
41 


0 


A[0] = Length of request in words 
A{1].[38:06] = Length of standard form hostname (in words) 
A({2] through A[A[OJ—1] = Hostname in standard form 


RSLT := SETSTATUS (2, 41, 8, A); _ 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number 


59 
60 
63 
81 
82 


Example 


Message 

NAME TOO LONG 

INVALID PARAMETER INDEX 
PARAMETER LENGTH ERROR 
FIVE CHARS REQUIRED 
INVALID STANDARD FORM 


For the system command HOSTNAME = HOSTA, use the following input: 


A[@] := 43 


_A[1] := 8 & 2 [38:96]; 
REPLACE POINTER (A[2], 8) BY 48"99819195" 8"HOSTA"; 
RSLT := SETSTATUS (2, 41, 9, A); 
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HS Call 


Use this call to stop or to resume the initialization of new jobs or tasks. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 2 
SUBTYPE 2 


VAL 1 = Stops the initiation of jobs and tasks 
| O = Resumes the initiation of jobs and tasks 
ARRAYROW AO] = 2 | 
A{1] =0 
Call 


RSLT := SETSTATUS (2, 2, VAL, A); 


Results 


SETSTATUS can return soft error 77 (“INCOMPLETE ENTRY”) if A[0] is not equal to 
2 or if A[1] is not equal to 0. 


SETSTATUS can return soft error 221 (“REQUEST DENIED; SECADMIN 
USERCODE REQUIRED”) if you need security administrator status to execute this call. 


Example 
For the system command HS, use the following input: 
A(@] := 2; 


A[1] := 9; 
RSLT := SETSTATUS (2, 2, 1, A); 
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HU Call 
Use this call to designate a usercode for certain BNA Host Service requests if they come 
5 from an ODT that has no terminal usercode assigned to it. 


If security administrator status is authorized for the system, you must have a security 
administrator usercode to execute this command. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 2 
SUBTYPE 44 
VAL 0 = Establishes a host usercode 
~-1 = Deletes a host usercode 
ARRAYROW A[0] = Total length of request 


A{1].[38:06] = Length of standard form usercode in words 
A[2] through A[A[O]-1] = Usercode in standard form 


Call 


RSLT := SETSTATUS (2, 44, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

60 INVALID PARAMETER INDEX 

63 PARAMETER LENGTH ERROR 

81 | FIVE CHARS REQUIRED 

82 | INVALID STANDARD FORM . 

221 REQUEST DENIED: SECADMIN USERCODE REQUIRED 
Example 


For the system command HU SITE, use the following input: 


A[@] := 4; 

A[1] := @ & 2 [38:96]; 

REPLACE POINTER (A[2]) BY 48"98019104" 8"SITE"; 
RSLT := SETSTATUS (2, 44, 9, A); 
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ID Call 


Use this call to initialize data comm, to allocate data comm prefixes, to allocate NSP 
audit options, and to initiate data comm. 


If security administrator status is authorized on your system, this SETSTATUS call can 


be invoked only by a security administrator usercode. If security administrator status is 
not authorized on the system, this call can be invoked by any privileged user. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 2 

SUBTYPE 52 

VAL [34:01] = 1 (AUDITON.) 


{33:01} = 1 (AUDITOFF.) 

[32:01] = 1 (An LSN list is supplied in ARRAYROW.) 
[31:08] = Audit options to be RESET. 

[23:08] = Audit options to be SET. 


[13:01] = 1 (Quit NSP only. Do not remove MCS status of running 
MCSs.) 


[12:01] = 1 (Display if current DCTRACE option setting is 
requested.) 


(11:01] = New value of DCTRACE option, if VALUE.[10:01] = 1. 
[10:01] = 1 (Change the setting of the DCTRACE option.) 
[09:01] = 1 (Maximum pseudostations are supplied.) 


(07:01) = 1 (A suffix is supplied in ARRAYROW, to which the NSP 
audit file can be released.) 


[04:01] = 1 (A circular audit file size is supplied in ARRAYROW.) 

{01:01} = 1 (The data comm prefix has been supplied.) 
ARRAYROW A{O] = Length of entry (including A[O}). 

A[1}.[23:08] = NSP number. 


A{i].[38:06] = Length of standard-form data comm prefix (in 
words) + 1. 


A(2] = NSP number. 


A[3] through A[3 +A[1].[38:6}-2] = Data comm prefix in standard 
form (only needed if VAL.[01:01] = 1). 


A[A[O}-1] = The maximum number of pseudostations to be 
allocated (only needed if VAL.[09:01] = 1). 
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Call 


RSLT := SETSTATUS (2, 45, VAL, A); 


Results 


SETSTATUS does not generate any soft errors for this call. The call initiates a process 
separate from SETSTATUS. 


Example 


For the system command ID 108 *TESTNDL ON PACK, use the following input: 


A[@] := 5; 

A{1] := © & 108 [23:8] & 3 [38:6]; 

REPLACE POINTER (A[2]., 8) BY 48"19069297" 8"TESTNDL", 
48"84" 8"PACK"s; 

RSLT := SETSTATUS (2, 52, 8&1 [@:1] & 1 [1:1], A); 


J 
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INSERT IN SUPERVISOR QUEUE Call 


No corresponding system command exists for this SETSTATUS call. Use this callto _ 
insert messages in the supervisor input queue, if it exists. The supervisor input queue is 
established when a task executes an ATTACHSPOQ statement. Before the message 

is inserted in the supervisor input queue, the time of day [TIME(11)] is appended to 

the front of the message. The supervisor expects the time of day in word 0 of incoming 
messages and expects the text of the message starting in word 1. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 23 

VAL 0 

ARRAYROW A{O] = Index of the word in the array that contains the length of the 


message in bytes 
A[2] = Length of the message in bytes 
A[3] through end = Message 

Call 


RSLT := SETSTATUS (2, 23, 8, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

60 INVALID PARAMETER INDEX 

63 PARAMETER LENGTH ERROR 
Example 


To insert the message “THIS IS A DUMMY MESSAGE?” into the supervisor queue, use 
the following input: 


A[@] := 2; 
A{2] := 19; 
REPLACE POINTER (A[3], 8) BY "THIS IS A DUMMY MESSAGE" FOR 19; 
RSLT := SETSTATUS (2, 23, @, A); 
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LC Call 


Use this call to enter a comment in the system log (GSYSTEM/SUMLOG). 


Input 


Use the following input for this call: — 


Parameter Value or Description 

TYPE 2 

SUBTYPE 26 

VAL 0 

ARRAYROW A[O] = Index of the word in the array that contains the length of the 


comment in bytes 
A[2] = Length of the comment in bytes 
A[3] through end = Comment 


Call 


RSLT := SETSTATUS (2, 26, @, A); 


Results | 


SETSTATUS does not return any unique soft errors for this call. 


| Example 


For the system command LC BEGIN SYSTEM TESTING, use the following input: 


A[@] := 23 

A[2] := 28; 

REPLACE POINTER (A[3], 8) BY “BEGIN SYSTEM TESTING" FOR 28; 
RSLT := SETSTATUS (2, 26, 9, A); | 
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LOGGING Call 


Use this call to change the system logging options. 


SETSTATUS Request Type 2 (Miscellaneous Requests) 


If security administrator status is authorized on the system, this call can be invoked only 
by a security administrator usercode. If security administrator status is not authorized 
on the system, this call can be invoked by any privileged user. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 


ARRAYROW 


Value or Description 


2 
76 


1 = For LOGGING *, LOGGING MINIMAL, and 


LOGGING ALL 


2 = For LOGGING <major> <log options> and for 
LOGGING <major>, <minor> <log options> 


A{O] = Index of the word of the array where the log setting stream 


starts 


A[2] through end = Log-setting stream 


The log-setting stream is a sequence of 16-bit and 8-bit items. You can build the stream 


by using EBCDIC pointer manipulations. 


If VAL = 1, the log-setting stream is in the following format: 


Number of Items 


1 
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Size of Each | 


16-bit 


16-bit 


Description 


Number of MAJOR types defined. 
Number = M. Three exceptions exist. 
The LOGGING * designation is an 
exception if M is equal to 4"FFOO". 
LOGGING MINIMAL is the exception if 4 
is equal to 4"FFO1". LOGGING ALL is the 
exception if M is equal to 4"0000". 


A specification whose type is MAJOR. The 
value for the MAJOR type is S. 


If S is greater than or equal to 4"FFOO", 
this log-setting is a MAJOR type, and 
S—4"FFOO" is the log setting for all MINOR 
types associated with the MAJOR type. 


if S is less than 4"FFOO", this item is an 
offset to a designation of a MINOR type at 
POINTER(AL[A[OJ])+S. This specification 
whose type is MINOR is shown in the 
format that follows. 
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9-50 


The following information for the MINOR type specification that was previously 
mentioned: 


Number of Items Size of Each Description 

1 16-bit Number of MINOR types defined. 
Number = 77. 

m 8-bit A MINOR-type log setting whose value 
equals s; s is the setting for the 
combination M,m. 


If VAL= 2, the log setting stream is in the following format: 


Number of Items Size of Each Description 
1 . 48-bit Number of items to be updated. 
Number = U. 


Each update specification is in the format that follows: 


Number of Items Size of Each Description 

1 16-bit MAJOR type to be updated. Type = M. 

] - 16-bit MINOR type to be updated. Type = 77. If 
m = 0, all MINOR types are updated. 

1 8-bit Mask bit to be applied on the next item. If 


the applicable bit is turned on, the value 
of the next item is used; if the applicable 
bit is turned off, the current value stays in 
effect. 


1 8-bit Minor-type log setting whose value equals 
S; s is the updated setting for the 
combination M,m. 


For both cases (VAL= 1 or VAL= 2), the log setting is an 8-bit item that controls logging 
for the applicable MAJOR type or combination of MAJOR type and MINOR type. The 
lower four bits control logging to the SUMLOG, and the upper four bits control logging | 
to the job file. Every log record has a result indicator that indicates the type of record. 
All 8-bit log setting items are controlled independently for each applicable major type or 
combination of MAJOR type and MINOR type. 


The bits and their results are as follows: 


SUMLOG Job File Log Record Results Indicator 

Bit O Bit 4 If this bit is turned on, success records are 
logged. 

Bit 1 Bit 5 If this bit is turned on, failure records are 
logged. 

Bit 2 Bit 6 If this bit is turned on, security-relevant 
records are logged. 

Bit 3 Bit 7 If this bit is turned on, security violation 


_ records are logged. 
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Call ib 


RSLT := SETSTATUS (2, 76, VAL, A); 


Results 


SETSTATUS does not return any special error messages for this call. 


Examples 


For the system command LOGGING *, use the following input: 


A[@] := 23 
REPLACE POINTER (A[2]) BY 4"FFOQ"; 
RSLT := SETSTATUS (2, 76, 1, A); 


For the system command LOGGING MINIMAL, use the following input: 


A[@] := 2; 
REPLACE POINTER (A[2]) BY 4"FFO1"; 
RSLT := SETSTATUS (2, 76, 1, A); 


For the system command LOGGING 4,5 NONE, use the following input: 


A[@] := 23 
REPLACE POINTER (A[2]) BY 
1, % NUMBER OF UPDATES 
48"0004", % MAJOR TYPE 
48"9905", % MINOR TYPE 
48"FF", % MASK ALL BITS 
48"96";  % SETTING OF @ (NONE) 
RSLT := SETSTATUS (2, 76, 2, A); 
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MA Call 


Use this call to make a file accessible only to APL by making its attribute APL equal to 
TRUE. You can also make the file attribute APL equal to FALSE to remove APL access 
privileges. 
_ This SETSTATUS call with VAL = 0 corresponds to the following system command: 
MA - APL <file title> 
This SETSTATUS call with VAL = 1 corresponds to the following system command: 


MA APL <file title> 


Input 


_ Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 40 

VAL O = Removes APL access privileges from the file 


1 = Makes the file accessible only to APL 
ARRAYROW A[O] = Index of the word in the array where the file title starts 
A[2] through end = File title in standard form 


Call 


RSLT := SETSTATUS (2, 48, VAL, A); 


Results 


If the specified file does not exist or cannot be found, soft soft error 49 (“NO FILE”) or 
error 7 (“FILE NOT ON DISK”) is returned. 


Example 
For the system command MA APL (FRED)A/B ON ANYPACK, use the following input: 


A[@] := 23 

REPLACE POINTER (A[2]) BY 
48" 14060404" 8"FRED" 48"91" 8"A" 48°91" 8"B" 
48"07" 8"ANYPACK"; 

RSLT := SETSTATUS (2, 48, 1, A); 
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Use this call to make a designated BOOTCODE file usable for initialization or to remove 
the eligible status of a BOOTCODE file. 


Input 


Use the following input for this call: 


Parameter 


TYPE 
SUBTYPE 
VAL 


ARRAYROW 


Call 


Value or Description 


2 
61 


0 = ForMB + <filename> ON <family name> 
PRIORITY 


1 = For MB- ON <family name> 

A{O} = Index of the word in the array where the file title starts 
A{1}.[47:01] = Family index specification is valid 
A[1].[46:08] = Family index specification 

A(1).[11:12] = Priority number 

A[2] through end = File title in standard form 


RSLT := SETSTATUS (2, 61, VAL, A); 


Results 


SETSTATUS does not return any unique soft errors for this call. 


Example 


For the system command MB + BOOT ON DISK (2), use the following input: 


A[@] := 2; 


A[1] := @ & 1 [47:01] & 2 [46:98]; 
REPLACE POINTER (A[2]) BY 

48"900602" 48"04" 8"BOOT" 48"24" 8"DISK"; 
RSLT := SETSTATUS (2, 61, @, A); 
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MC Call 


Use this call to designate a code file whose title is of the form SYSTEM/< file title> asa 
compiler code file. The call can also remove compiler status from a code file. 


If security administrator status is authorized on the system, this SETSTATUS call can 


be invoked only by a security administrator usercode. If security administrator status is 
not authorized on the system, this call can be invoked by any privileged user. 


Input 


Use the following input for this call: 


Parameter ’ Value or Description 

TYPE Z 

SUBTYPE F 

VAL O = Marks a code file as not being a compiler 


1 = Marks a code file as a compiler 
ARRAYROW A[0] = Index of the word in the array where the file title starts 
A[2] through end = File title in standard form 


Call 


RSLT := SETSTATUS (2, 7, VAL, A); 


Results 
Soft Error Number Message 
49 NO FILE (A file with the designated name was not found.) 
221 SECADMIN USERCODE REQUIRED (An InfoGuard security 


administrator is authorized for the system, and the caller does not 
have a usercode that is designated for a security administrator.) 


A successful SETSTATUS call with a nonzero A [1].[15:16] indicates a warning. The 
value in A [1].[15:16] contains the warning number. 


Warning Description 
941 , CODEFILE IS TADS-CAPABLE 
Example 


For the system command MC *ALGOL, use the following input: 


A[@] := 23 

A[1] := 9; 

REPLACE POINTER (A[2], 8) BY 48"19020206" 8"SYSTEM", 
48"05" 8"ALGOL"; 

RSLT := SETSTATUS. (2, 7, 1, A); 
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MP Cail (Mark Program) 


Use this call to associate an identity with a program. 


Input 


Use the following input for this call: 


Parameter Nalue or Description 
TYPE 2 

SUBTYPE 84 

VAL 0 

ARRAYROW A{O] = 2 


A(2].[32:17] = 5 

A(5).(32:17] = Index to the file title in standard form 
A[5].[46:08] = Number of attribute words 

A[6] through A[n] = The attribute words 


Each attribute word has the following layout: 


Field Value or Description 

[38:06] Attribute number (1 = Identity). 

[32:17] Index to the attribute value. 

[15:16] If O, delete the attribute. If any other value, turn on the attribute. 
Call 


RSLT := SETSTATUS (2, 84, @, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

18 NOT A CODEFILE. 

49 . NO FILE (The file is not present.) 

255 CODEFILE INCOMPATIBLE WITH THIS MCP 


VERSION (The file is not properly structured.) 


8600 0346-000 9-55 


SETSTATUS Request Type 2 (Miscellaneous Requests) 


Example 


To give the program *OBJECT/MM an identity of ID1, use following input: 


A[@] := 2; 

A[2] := © & 5 [32:17]; 

A[5] := 9 & 15 [32:17] & 1 [46:98]; 

A[6] := @ & 1 [38:86] & 18 [32:17] & 3 [15:16]; 


REPLACE POINTER (A[15]) BY 48"@D920296" 8"OBJECT", 48"92" 8"MM"; 
REPLACE POINTER (A[18]) BY 48"67019193 8"ID1"; 
RSLT := SETSTATUS (2, 84, 0, A); 
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MU Call 


Use this call to enter a designated usercode in the USERDATAFILE as a valid usercode. 
_ Ifa password is designated, it becomes the password for the usercode. 


This SETSTATUS call with VAL = 0 corresponds to the following system command: 
MU <usercode>/<password> 

This SETSTATUS call with VAL = 1 corresponds to the following system command: 
MU <usercode>/<password> PRIVILEGED 


If security administrator status is authorized for the system, you must have security 
administrator status to execute this function. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 10 

VAL 0 = Removes privileged status from a usercode 


1 = Makes the usercode privileged 
ARRAYROW A({O] = Pointer to usercode/password in standard form 
A[2] through end = Usercode/password in standard form 
Call 


RSLT := SETSTATUS (2, 10, VAL, A); 


Results 

If the designated password does not meet existing requirements for minimum password 
length, SETSTATUS returns soft error 152 (“MINIMUM PASSWORD LENGTH 
ENFORCED, REQUEST DENIED”). 


If a valid USERDATAFILE is not present, SETSTATUS returns soft error 9 
(“REQUEST DENIED”). 
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Example 

For the system command MU FRED/SECRET PRIVILEGED, use the following input: 
A[@] := 23 
REPLACE POINTER (A[2]) BY 


48"GF010204" 8"FRED" 48"6" 8"SECRET"; 
RSLT := SETSTATUS (2, 10, 1, A); 
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NETEX Call 


Use this call to initiate and to terminate NETEX (NETwork ExXecutive) software. The 
call can also designate the NETEX initialization file. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE a 

SUBTYPE 74 

VAL 1 = Terminate NETEX. 
2 = Start NETEX. - 


3 = Start NETEX and use the default initialization file. 

4 = Set NETEX initialization file to the default file title. 

5 = Start NETEX, but do not use an initialization file. 

6 = Set NETEX initialization file to a null value. 

7 = Start NETEX and use the specified file title as the initialization 


file. 
8 = Set the NETEX initialization file to the specified title. 
ARRAYROW A[O] = 2 


If VAL = 7 or 8, array A has the following values: 


Array Description 

AC1) Length of the standard form file title in 8-bit bytes 

A{2] through A{n] NETEX initialization file title in standard form 
Call 


RSLT := SETSTATUS (2, 74, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 
211 . | NETEX TERMINATE IN PROGRESS 
212 NETEX INITIALIZE IN PROGRESS 
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Example 
For the system command NETEX -, use the following input: 


A[@] : 
RSLT : 


23 
SETSTATUS (2, 74, 1, A); 
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NETWORK INITIALIZATION AND TERMINATION Call 


Use this call to initiate or terminate operation of BNA Version 1, BNA Version 2, and 
X25. You can also designate the network initialization file to use. 


Input 


Use the following input for this call: 


Parameter | Value or Description 

TYPE 2 

SUBTYPE 80 

VAL Request for network changes. 


8:1] = 1 (Going to isolated mode— BNA Version 2.) 
8:1] = 0 (Not going to isolated mode— BNA Version 2.) 
[7:4] = Network initialization/termination action: 
e 0O=No action 
e 1 = Initiate network 
@ 2 = Slow network shutdown 
° = Fast network shutdown 
e 4 = Terminate network library 
[3:4] = Network initialization file action: 
e 0=Noaction 
@ 1 = Set NETINIT file to *NULL 
@ 2 = Set NETINIT file to *DEFAULT 
e 3 = Set NETINIT file to file name 
ARRAYROW A[O] = 4 


A(2].[47:1] = 1 if the network is selected by the network name 
indicator. The following value is also true if A[2].[47:1] = 1: 


e A(2].[3:4] = Contains the index of the network name in the 
array. The network name should be in substandard form and 
can have the following values: 


-  BNAV1 
-  BNAV2 
- X25 


continued 
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9-62 


continued 


Parameter 


Call 


Value or Description 


A{2]:[47:1] = 0 if the network ts selected by the network number. 
The following value is also true if A[2].[47:1] = 0: A[2].[3:4] 
contains the network index, which can have the following values: 


e 1-= BNAVI 
e 2= BNAV2 
e@ 3=X25 


It is safer to use the network name, because the numerical values 
for the network index are subject to change. 


A({2].{46:1] = 0 if there is no NETINIT file. 


A(2].[46:1] = 1 if a NETINIT file is supplied. A[2].[7:4] contains 
the NETINIT offset to the file title. 


Index of A[2].[7:4] = Index of NETINIT file title in standard form if 
A[2].[46:1] = 1 


- Index of A[2].{3:4] = Index of network name in substandard form if 


A(2].[47.1] =1 


RSLT := SETSTATUS (2, 88, VAL, A); 


Results 


SETSTATUS does not return any messages for this call. 


Examples for BNAV2 


For the system command BNA +, use the following input: 


yore VAas 
it et go 
= 


> 
{| 
— 
ded 
ee ee ee 
il 


VAL. [8 


I] e+ ef ee FT ft 


For the system command BNAV2 +, use the following input to bring BNAV2 to network 


mode: 


[47:1] & 3[3:4]; 

ER (A[3]) BY. 48"95" 8"BNAV2"; 

; % Isolated mode 

3 % Initiate 

; % Do not use NETINIT file for BNA + 
ETSTATUS (2, 88, VAL, A); 
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4; 


:= @ & 1[47:1] & 3[3:4]; 
REPLACE 
V.[8:1] := 
‘V.(7:4] s= 13; % 
V.[3:4] := 8; % 
RSLT := 


POINTER (A[3]) BY 48"@5" 8"BNAV2"; 

Going to network mode, not isolated mode 
Initiate network 

No netinit file given, use existing netinit file 


SETSTATUS (2, 8, V, A); 


To completely shut down the network (which you can do anytime) use the following 
input to perform the equivalent of the BNA — command: 


A[@] := 4; 
A[1] := @; 
A[2] := @ & 1[47:1] & 3[3:4]; 


REPLACE POINTER (A[3]) BY 48"05" 8"BNAV2"; 


VAL.[7:4] = 
RSLT := 


% Terminate 
SETSTATUS (2, 88, VAL, A); 


Use the following input to perform the equivalent of the NET + *HOST/NETINIT/V2 


command. 


A[@] := 


A[1] 


BNAV?2 is the network name. 


4; 


2= OB; 


A[2] := @ & 1[47:1] & 1[46:1] & 4[7:4] & 3[3:4]; 
REPLACE POINTER (A[3]) BY 48"@5" 8"BNAV2"; 


REPLACE POINTER (A[4]) BY 48"13920304", 


8"HOST", 48"97", 
S"NETINIT", 48"02, 8"V2"; 


VAL. [8:1] := @ 


VAL. [7:4] 
VAL. [3:4] = 
RSLT := 


1; % Initiate 
3; % NETINIT file 
SETSTATUS (2, 88, VAL, A); 


Examples for BNAV1 


Use the following input to perform the equivalent of the NET + *HOST/NETINIT/V1 


command. 


A[@] : 
A[1] : 


BNAV1 is the network name. 


4; 
Q; 


A[2] := 9 & 1[47:1] & 1[46:1] & 4[7:4] & 3[3:4]; 
REPLACE POINTER (A[3]) BY 48"25" 8"BNAV1"; 


REPLACE POINTER (A[4]) BY 48"13020304", 8"HOST", 48"97", 
, S"NETINIT", 48"02, 8"V1"; 
VAL.[8:1] := @3 
VAL.[7:4] = 1; % Initiate 
VAL. [3:4] = 3; % NETINIT file 


RSLT := SETSTATUS (2, 8, VAL, A); 


Use the following input to perform the equivalent of the NET —- NOW command with the 
network name. BNAV1 is the network name. 
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A[@] : 
A[1] : 
A(2] := 9&1 [47:1] & 3[3:4]; 
REPLACE POINTER (A[3]) BY 

48"95" 8"BNAV1"; 
VAL.[7:4] = 4; % Terminate 
RSLT := SETSTATUS (2, 88, VAL, A); 


4; 
B; 


Examples for X.25 


Use the following input to perform the equivalent of the X25 + command. X25 is the 
network name. 


A[@] := 4; 
ALI := 83 
A(2] := 9 & 1[47:] & 3([3:4]; 


REPLACE POINTER (A[3]) BY 48"@3" 8"X25"; 
VAL.[7:4] = 1; % Initiate 

VAL.[3:4] = 0; % If no NETINIT file 
RSLT := SETSTATUS (2, 8, VAL, A); 


Use the following input to perform the equivalent of the X25 —~ command. X25 is the 
network name. 


A[@] : 
A[1] := 9; 

A[2] := @ & 1[473;1] & 3[3:4]; 

REPLACE POINTER (A[3]) BY 48"93" 8"X25"; 
VAL.[7:4] = 4; % Terminate s 

RSLT := SETSTATUS (2, 8, VAL, A); 


4; 
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OP Call 


Use this call to turn on or off an MCP run-time option. For a list of available options, 
refer to the information on the OP (Options) system command in the System Commands 
Reference Manual. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 2 

SUBTYPE 0 

VAL O = Turn off option 


1 = Turn on option 
ARRAYROW A(O] = 2 
AC1) = Option number 


Call 


RSLT := SETSTATUS (2, 8, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

5 IT CANT BE DONE 

10 INVALID NUMBER 

92 REQUIRED LOCK IN USE (Try again) 

194 DISK MIRRORING ALREADY SET 

195 DISK MIRRORING NOT YET SET 

196 MIRRORED SET(S) STILL EXIST 
Example 


For the system command OP + 4, use the following input: 


A[®] <= 23 
Ai] := 4; % LPBDONLY 
RSLT := SETSTATUS (2, @, 1, A); 
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PB Call 


Use this call to print or to punch backup disk or tape files. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
_ SUBTYPE 
VAL 
ARRAYROW 


Value or Description 

2 

50 

0 

A[O] = Length of request 


A({1] through A[A[0]-1] = List of requests 


The layout of each request entry is as follows: 


Array A Value or Description 
A{n].[38:06] O = Print or punch backup disk files. 
A{n].[38:06] = Print backup tape files. 
A{n).[31:08] 6 = Line printer. 
A{n].[31:08] 11 = Card punch. 
A[n].[31:08] 13 = Magnetic tape. Must be designated if [33:01] is 1. 
A(n].[15:16] Mix number. Valid if [38:06] is 0. 
A{n+1] Unit number. Used if [38:06] is 1. 
Call 


RSLT := SETSTATUS (2, 58, 8, A); 
Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 
31 INVALID UNIT NUMBER 
71 NO BACKUP ON DK OR PK 
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Examples 


For the system command PB MT 29, use the following input: 


A[@] := 3; %% total length 
A[1] := @ & 13 [31:08] & 1 [38:6]; %% MT 

A[2] := 29; %% unit number 
RSLT := SETSTATUS (2, 58, @, A); 


For the following system command sequence, use the indicated input: 


PB 2345 CP 

PB 5678 LP 

PB 5698 LP 

A[@] := 4; 

A[1] := @ & 11 [31:88] & 2345 [15:16]; %% CP, mix number 
A[2] := @ & 6 [31:08] & 5678 [15:16]; %% LP, mix number 
A[3] := @& 6 [31:08] & 5698 [15:16]; 

RSLT := SETSTATUS (2, 58, 8, A); 
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PP Call 


Use the PP call to change the privileged status of a codefile. You can assign privileged 
(PU) and security administrator (SECADMIN) status. 


If security administrator status is authorized on your system, you must have a security 


administrator usercode to invoke this call. If security administrator status is not . 
authorized on your system, you must have privileged status to invoke this call. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 8 ; 

VAL ~]1 = Makes a privileged program transparent 


2 = Changes the status of a privileged program to nonprivileged 

3 = Makes a program into a privileged program 

14 = Applies the privileged list to the program 

15 = Adds the privileged list to the program 

16 = Removes the privileged list from the program 
ARRAYROW A[O] = 6 

A(2] = Mask of privileged 

A({3] = Mask of transparent privileges 


A[6] through end = File title in standard form 


The following privileges are defined and can be used when VAL is equal to 14, 15, or 16: 


Privilege MASK Bit 

PU MASK bit 0 

SECADMIN MASK bit 1 
Call 


RSLT := SETSTATUS (2, 8, VAL, A); 


Results 


If VAL is 14, 15, or 16 and the call is successful, SETSTATUS returns the new privilege 
status in word 4 and the new transparent privilege status in Word 5. 
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SETSTATUS can return the following soft errors for this call: 


Soft Error Number 


100 


255 


Message 

PREVIOUSLY DONE (File does not need to be changed.) 

INVALID FILE TYPE (File is not properly structured.) 

NO FILE (File is not present.) 

INVALID PARAMETER INDEX (Index name is too large.) 
PARAMETER LENGTH ERROR (Length of name is too large.) 

FIVE CHARS REQ (Standard form name is badly formed.) 

INVALID STANDARD FORM (Standard form name is badly formed.) 


PU AND PU TRANSPARENT CANNOT BOTH BE SET (Would 
conflict with existing privileges for the file.) 


SECADMIN AND SECADMIN TRANSPARENT CANNOT BOTH BE 
SET (Would conflict with existing privileges for the files.) | 


CODEFILE INCOMPATIBLE WITH THIS MCP VERSION (File is not 
properly structured.) 


Asuccessful SETSTATUS call with a nonzero A [1].[15:16] indicates a warning. The 
value in A [1].[15:16] contains the warning number: 


Warning Number 
941 


Example 


Message 


CODEFILE IS TADS-CAPABLE 


For the system command PP *MYPROGRAM:PU, SECADMIN TR, use the following 


input: 


A[@] 
A(1] 
A[2] 
A[3] 
REPLA 
RSLT : 


e we 


© CD ee cf ee oF 

ul 
YA7~rA QAO 
m © 


tomiu 
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& 1 [6:81]; 
& 1 [61:01]; 

INTER (A[6]) BY 48"0D02@129" 8"MYPROGRAM"; 
TSTATUS (2, 8, 14, A); 
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RB Call 


Use this call to cause the MCP to build a new access structure for the system directory 
if the name starting at word 3 of the array A is a family name, or for the catalog if the 
name is TAPE. If you designate TAPE, the catalog level of the system must not be less 
than 1. If the name is VOLUMEDIRECTORY, a new key structure for the volume 
directory is rebuilt. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE g =D 
SUBTYPE 4 
VAL | 0 
ARRAYROW A[0] = 2 
Af1] =0 


A[2] = Character length of name beginning at A[3]. The name can 
be either a family name, a volume directory, or a tape. 


A[3] = Name in substandard form. 


Call 


RSLT := SETSTATUS (2, 4, @, A); | 


Results 


SETSTATUS does not return any unique soft errors for this call. If the catalog level of 
the system is:less than 1, the MCP issues an error message. 


Example 


For the command RB ON USERPACK, use the following input: 


A[@] := 2; 

A[1] := 9; 

A[2] := 9; 

REPLACE A[3] BY 48"98" 8"USERPACK"$ 
RSLT := SETSTATUS (2, 4, 8, A); 
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RECONFIGURE Call 


Use this call to regroup the hardware resources according to either the designated 
groups or the default specification. The call causes a halt/load of existing groups that are 
being reconfigured to the new groups. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 
ARRAYROW 


Value or Description 

2 

51 

0 

A{O] = Length of request 

A{1).{38:6] = Number of additional words (A[0}-2). 
A[1].{32:1] = 1 (Reconfigure NOW.) 

AC1].(32:1] = 0 (Wait for a null mix.) 
A{1].{00:1] = 0 (All other systems.) 

A[2] = 0 (All other systems.) 

A[3] = Word length of the source group list. 

AL4] through A{A[3]+3] = Source group list. 
A[A[3]+4] = Word length of the target group list. 
ALA[3]+5] through A[A[O]-1] = Target group list. 


The layout of each entry in the source group list is as follows: 


Array A 
A{n} 
A{n+1] through end of entry 


Value or Description 
Character length of the name. 


GROUP (A 12, A 15, or A 17). Resource ID, 
GROUP, or INSTALLATION on all other 
systems. 


The layout of each entry in the target group list is as follows: 


Array A 
Ain] 
Aln+1] through end of entry 


Call 


Value or Description 
Character length of the name. 


Group ID, DEFAULT, or MINIMAL for A 12, 
A 15, or A 17 systems. Resource ID, 
DEFAULT, or installation 1D for all other 
systems. 


RSLT := SETSTATUS (2, 51, @, A); 
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Results 
SETSTATUS does not return any unique soft errors for this call. 


Examples 


For the system command RECONFIGURE GROUP AS TWOBY NOW, use the 


following input: 
A[@] := 9; 
A[1] := 9 & (A[@]-2) [38:96] %% additional words 
& 1 [32:81]; %% NOW 
A[2] := 8; %% not B7988 
A[3] := 2; 
REPLACE POINTER (A[4], 8) BY %% A[4]-A[5] 
5 FOR 1 WORDS, 8"GROUP"; 
A[6] := 23 
REPLACE POINTER (A[7], 8) BY %% A[7]-A[8] 


5 FOR 1 WORDS, 8"TWOBY"; 
RSLT := SETSTATUS (2, 51, @, A); 


For the system command RECONFIGURE INSTALLATION AS SYSA, SYSB, SYSC, 


use the following input: 

A[@] := 14; 

A[1] := @ & (A[@]-2) [38:96]; %% additional words 
A[2] := @; %% not B7998 

A[3] := 3; 

REPLACE POINTER (A[4], 8) BY %% A[4]-A[6] 

12 FOR 1 WORDS, 8"INSTALLATION"; 
A[7] := 6; 
REPLACE POINTER (A[8], 8) BY %% A[8]-A[13] 


4 FOR 1 WORDS, 8"SYSA ", 

4 FOR 1 WORDS, 8"SYSB ", 

4 FOR 1 WORDS, 8"SYSC "; 
RSLT := SETSTATUS (2, 51, @, A); 
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RES Call | 


The Reserve Disk specification consists of the RES (Reserve) system command without 
the RES or RES- prefix. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 2 
SUBTYPE 12 
VAL O = Reserves the disk 
1 = Returns the disk 
ARRAYROW A{O] = Index of the word in the array that contains the length of the 


message in characters 
A{2] = Length of message in characters 
A[3] through end = Reserve Disk specification 


Call 


RSLT := SETSTATUS (2, 12, VAL, A); 


Results 


Because the Reserve Disk specification is not parsed by SETSTATUS, the caller cannot 
determine whether the Reserve Disk call is successful. SETSTATUS can return the 
following soft errors for the RES— call: 


Soft Error Number Message 

60 INVALID PARAMETER INDEX 

63 PARAMETER LENGTH ERROR 
Example 


For the system command RES PK 46 SECTOR 3000 FOR 100, use the following input: 


A [@] := 2; 

A [2] := 253 

REPLACE POINTER (A[3]) BY "PK 46 SECTOR 3000 FOR 199"; 
RSLT := SETSTATUS (2, 12, 8, A); 


tou 
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RESTRICT FILE Call 
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Use this call to turn on or off security-related restrictions on files. 
If security administrator status is authorized on the system, this SETSTATUS call can 


be invoked only by a security administrator usercode. If security administrator status is 
not authorized, this call can be invoked by any privileged user. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 77 

VAL 4 = Unrestricts access to a file 


5 = Restricts access to a file 
ARRAYROW AO} = Index of the word in the array where the file title starts 


: 
A[2] through end = File title in standard form 


Call 


RSLT := SETSTATUS (2, 77, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

8 INVALID FILE NAME 

9 REQUEST DENIED 

49 NO FILE 
Example 


For the system command RESTRICT FILE *MYPROGRAM, use the following input: 
A[@] := 2; 


REPLACE POINTER (A[2], 8) BY 48"9D92199" 8"MYPROGRAM"; 
RSLT := SETSTATUS (2, 77, 5, A); 
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RESTRICT VOLUME Call 


Use this call to turn on or off security-related restrictions on volumes. 


If security administrator status is authorized on the system, this SETSTATUS call can 
be invoked only by a security administrator usercode. If security administrator status is 
not authorized, this call can be invoked by any privileged user. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 


ARRAYROW 


Value or Description 

2 

77 

2 = Unrestricts access to volume 

3 = Restricts access to volume 

A{O) = Length of request 

A[1] through A[(A[0}-1)] = List of requests 


The layout of each request entry is as follows: 


Array A 
A(n}.[38:6] 
A(n+1] 


Call 


Value or Description 
1 (Entry size) 


6-character serial number in EBCDIC, with leading EBCDIC zeroes 
for a numeric string, or trailing blanks for an alphanumeric string if 
the serial number is less than 6 characters long 


RSLT := SETSTATUS (2, 77, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number 
10 

224 

226 
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Message 

INVALID NUMBER | 

VOLUME DIRECTORY NOT READY YET 
SECOPT TAPE CHECK IS NOT AUTOMATIC 
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Example 


For the system command RESTRICT ~- VOLUME ABC, 1234, use the following input: 


A[@] := 53 

A[1] := @ & 1 [38:6]; 

REPLACE POINTER (A[2], 8) BY "ABC "; 
A[3] := @ & 1 [38:6]; 

REPLACE POINTER (A[4], 8) BY "981234"; 
RSLT := SETSTATUS (2, 77, 2, A); 
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RO Call 


This call corresponds to the system command OP (Options). Use this call to turn various 
options off. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 0 

VAL | 0 

ARRAYROW ALO] = Number of options + 1 


A(1] through A[(A[0]-1)] = Option list; one option member per word 
in (15:16) of that word 


Call 


RSLT := SETSTATUS (2, @, @, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 
ae IT CANT BE DONE 
10 INVALID NUMBER 
195 DISK MIRRORING NOT SET YET 
_ 196 MIRRORED SET(S) STILL EXIST 
‘Example 


For the system command OP- 1,7,9,15, use the following input: 


A[@] : 
A[1] : 
A[2] : 
A[3] : 
A(4] : 
RSLT : 


TSTATUS (2, @, @, A); 
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RP Call 


Use this call to make a code file resident. 


9-78 


Input 


Use the following input for this call: 


Parameter 


TYPE 
SUBTYPE 
VAL 


ARRAYROW 


Call 


Value or Description 

2 

63 

O = Cancels resident status of a code file 

1 = Marks a code file as a resident program 

A[0] = Index of the word in the array where the file title starts 


A[2] through end = File title in standard form 


RSLT := SETSTATUS (2, 63, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number 


82 
255 


Example 


For the system command RP *SYSTEM/DUMPANALYZER, use the following input: 


A[@] := 23 


Message 
PREVIOUSLY DONE 
INVALID FILE TYPE 


NO FILE 


INVALID PARAMETER INDEX 

PARAMETER LENGTH ERROR 

INVALID STANDARD FORM . 

CODEFILE INCOMPATIBLE WITH THIS MCP VERSION 


REPLACE POINTER A (A[2]) BY 48"17829206""SYSTEM 


48"0C"" DUMPANALYZER" ; 


RSLT := SETSTATUS (2, 63, 1, A); 
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Use this call to substitute one backup medium for another. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 
ARRAYROW 


Value or Description 

2% 

25 

0 

A[O} = 8 

A{1] = 0 & 6 [38:06] 

A[2] through A[7] = Substitute backup information 


The substitute backup information consists of six words. Each word represents the 
backup kind list for a specific backup medium. The backup media are as follows: 


Word 
A[2] 
A[3] 
AL4] 
A[5] 
A(6] 
A[7] 


Backup Medium 
PACK 

TAPE7 

TAPES 

PETAPE 

TAPE 

DISK 


The backup kind list consists of up to 6 bytes, each byte representing a backup kind. 
The backup kind list should be right-justified. The backup kinds are as follows: 


Byte 

4'C1" 
4"51" 
4"4D" 
4"4E" 
4"4F" 
4"6D" 
4"41" 


Call 


Backup Kind 


DLBACKUP 
PACK 
TAPE7 
TAPES 
PETAPE 
TAPE 

DISK 


RSLT := SETSTATUS (2, 25, 8, A); 
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Results 


The backup kind lists are not checked for duplicates. When you designate an invalid 
kind or the length is not 6, SETSTATUS returns soft error 9 (“REQUEST DENIED”). 


Example 


. For the system command SB PACK = PACK TAPE9, TAPE7 = TAPE7, TAPE9 
= TAPE9, PETAPE = PETAPE, TAPE = TAPE, DISK = DLBACKUP, use the 


following input: 
A[@] := 8; 
A[1] := @ & 6 [38:86]; 


REPLACE POINTER (A[2]) BY 48"@20909004E51" 
48" Q8028000084D" 
48" GO0G0G0BO04E" 
48" 90028000004 F" 
48" Q0BGSOGGBB6D" 
48" QB02620000C1" ; 


RSLT := SETSTATUS (2, 25, @, A); 
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SBP Call 


Use this call to display and to set the time interval used for computing information on 
system utilization. On HDU systems, this call can also change the IOINTERRUPT 
strategy that the MCP uses. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 47 

VAL 0 

ARRAYROW ALO] = Number of words in entry 


A{1] through end = System balancing parameters 


The SBP parameters consist of sets of 2-word entries. The first word defines the type of 
parameter, and the second defines the new value. 


Two types are defined: INTERVAL (0) and IOINTERRUPT (1). 
The INTERVAL type expects a number representing the number of seconds. The 


IOINTERRUPT type expects a mask representing the required strategy. The mask-bit 
assignments are as follows: 


Mask Bit Description 

0:1 Interrupt word is valid. 

1:1 IOFINISH strategy. 

2:1 QEMPTY strategy. 

3:1 WAITING strategy. 
Call 


RSLT := SETSTATUS (2, 47, @, A); 


Results 


SETSTATUS can return the following soft errors for this call: 
Soft Error Number Message 


10 INVALID NUMBER (This message is returned if the parameter type 
is not INTERVAL or IOINTERRUPT, or if a you designated a negative 
counterinterval.) 


if ADDITIONAL INFO REQUIRED. 


8600 0346-000 9-81 


SETSTATUS Request Type 2 (Miscellaneous Requests) 


Example 


For the system command SBP INTERVAL = 10 IOINTERRUPT = QEMPTY 
WAITING, use the following input: 


A[@] := 5; 
A[1] := 9 & 1 [38:96]; % ® = Interval 
A[2] := 10; % 18 = Seconds 
A[3] := 1&1 [38:06]; % 1 = I0interrupt 
A[4] := 8 & 1 [8:1] % Valid Interrupt 
& @ [1:1] % I0finish 
& 1 [2:1] % Qempty 
&1 [3:1]; % Waiting 
RSLT := SETSTATUS (2, 47, 8, A); 
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Use this call to allocate the security options word for the system. The values to be 
assigned to security options are placed in the appropriate fields of VAL. A bit mask must 
also be supplied in A[1]. This mask indicates the fields of VAL that are being assigned 


values. 


If security administrator status is authorized on the system, this call can be invoked only 
by a security administrator usercode. If security administrator status is not authorized 
on the system, this call can be invoked by any privileged user. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 
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Value or Description 

2 

28 

Values for security options: 

[00:01] = Ignored. 

01:01] = 1 (Turns on program dump filtering option.) 
02:01} = 1 (Turns on mandatory disk scrubbing option.) 
03:01] = Turns on nonuser file security: 

e 0O= PUBLIC 

@ 1 = PRIVATE 

{04:01 = 1 (Restricts all hosts.) 

05:01] = 1 (Backup files have usercodes of owners.) 
[07:01] = Reserved for future use. 

11:04] = Sets security class: 

e QO = Class U (unspecified) 

e 1=Class SO 

e 2=Class$1 

e 3=Class $2 

13:02] = ignored. 

[15:02] = Designates tape security: 

e O=NONE 

@ 1 = AUTOMATIC 

18:03] = Designates password management, where 
e 0= MINIMAL 

e 1 = GENERATED 

[27:09] = Reserved for future use. 


continued 
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continued 

Parameter Value or Description 
30:03] = An integer in the range 0 to 6, inclusive, sets the CANDE 
LAISSEZFILE option. 
31:01] = Reserved for future use. 
[32:01] = 1 (Sets the CANDE DIALLOGIN option.) 
[33:01] = 1 (Sets the CANDE ALLLOGIN option.) 
[34:01] = 1 (Sets the CANDE SECDIALIN option.) 
[35:01] = 1 (Sets the CANDE SECPSEUDO option.) 
[36:01] = 1 (Sets the CANDE SECALL option.) 
37:01] = 1 (Sets the CANDE USECOMSPRIV option.) 
[46:09] = Reserved for future use. 
[47:01] = Ignored. 

ARRAYROW A{O} = 2 (Number of valid words in this array.) 


AL1] = Mask for assigning security options values. in this bit mask, 
1s indicate the values in the VAL parameter that are to be applied to 
the security options word. For example, if bits [18:3] of A[1] are 
equal to 1, the corresponding field in the VAL parameter ([18:3]) is 
used to establish the new system password management selection. 
But if bits 18, 17, and 16 of A[1] are 0, the system password 
management selection is left unchanged. 


On systems without InfoGuard security enhancements software, you can use this 
SETSTATUS call only to turn on or off file security based on the declarer [06:01]. No 
other options of the call are allowed. 


On systems with InfoGuard security enhancements software, all the options of this call 
are allowed. 


Call 


RSLT := SETSTATUS (2, 28, VAL, A); 


Results 


If an attempt is made to assign new security options values that are incompatible with 
the resultant new security class, an error is returned by SETSTATUS, and the system 
security options are not changed. 


If a new security class is assigned that is more restrictive than the current security class, 


any preexisting security options values that are not explicitly modified to match this new 
class are automatically modified so that they are compatible with the new class. 
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To enable the caller to determine how the security options word actually changed, the 
old value of the security options word is returned in A[2], and the new value of the 
security options word is returned in A[3]. If no soft error occurs, the original contents 
of A[1] (the assignment mask) are also preserved by SETSTATUS. If a soft error does 
occur (for example, if the new value to be assigned is incompatible with the new security 
class), then A[1] returns the soft error code (for example, 220) in the following manner: 


A[1] := ® & SOFTERRORCODE [46:8] & 1 [47:1]; 


Example 


For the system command SECOPT + DISKSCRUB, CLASS = SO, use the following 


input: 
A[@] := 2; 
A[1] := @ &1 [1:1] & 15 [11:4]; 
VAL := @&1 [1:1] & 1 [11:4]; 
RSLT := SETSTATUS (2, 28, V, A); 
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SEGARRAYSTART Call 


Use this call to allocate the array size (in words) beyond which the MCP segments an 
array by default. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 2 
SUBTYPE 60 
VAL 0 
ARRAYROW A[0] = 4 
A[1] = 0 


Call 


RSLT : 


Results 


A[3] = New SEGARRAYSTART value 


= SETSTATUS (2, 68, @, A); 


This call can return the following soft errors: 


Soft Error 


178 
179 


Example 


Number Message 


SEGARRAYSTART VALUE TOO SMALL 
SEGARRAYSTART VALUE TOO LARGE 


For the system command SEGARRAYSTART 8192, use the following input: 


A[@] : 
A[1] : 
A[2] : 
A[3] : 
RSLT : 
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Q + 
J 


1; 
8192; 
SETSTATUS (2, 68, 8, A); 


tow vw nou 
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SF Call 


Use this call to change the memory-management parameters for the entire system. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 2 

SUBTYPE 55 

VAL | 0 

ARRAYROW A(O] = 7 


AL1] = OLAYGOAL 

A(2] = AVAILMIN 

A[3] = FACTOR 

A[4] = MEM PRIORITY FACTOR 
A[5] = BUFFERGOAL 


The parameter words A[1] through A[5] should be formatted as follows: 


Array A Value or Description 
A(n}.{47:01] O = If the corresponding factor is not to be changed 
1 = lf the corresponding factor is to be changed 
A(n).[46:47] New value for factor 
Call 


RSLT := SETSTATUS (2, 55, VAL, A); 


Results 


This call can return the following soft errors: 
Soft Error Number Message 
77 INCOMPLETE ENTRY (If A[0] is incorrect) 
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Example 


For the system command SF FACTOR 100, use the following input: 


A[@] := 6; 

A[1] := @; 

A[2] := @; 

A[3] := @ & 1 [47:01] & 108 [46:47]; 

A[4] := 9; % MEM PRIORITY FACTOR NOT TO BE CHANGED 
A[5) := 3 

RSLT := SETSTATUS (2, 55, @, A); 
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SI Call 


Use this call to change the code file used for the system intrinsics. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 2 
SUBTYPE 5 
VAL | 0 
ARRAYROW A[O] = 2 
A(1] =0 


A[2] through end = File title in standard form 


Call 


RSLT := SETSTATUS (2, 5, 8, A); 


Results 


This call can return the following soft errors: 


Soft Error Number Message 

59 NAME TOO LONG 

63 PARAMETER LENGTH ERROR 

81 FIVE CHARACTERS REQ 

82 INVALID STANDARD FORM 
Example 


For the system command SI **SYSTEM/INTRIN, use the following input: 


A[®] := 2; 

REPLACE POINTER (A[2], 8) BY 48"11820206" 8"SYSTEM", 
48"06" 8"INTRIN"; 

RSLT := SETSTATUS (2, 5, 8, A)3 
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SL Call 


Use this call to map function names to library code files and modify the library attributes 
of library functions. 


If security administrator status is authorized on the system, this SETSTATUS call can 


be invoked only by a security administrator usercode. If security administrator status is 
not authorized on the system, this call can be invoked by any privileged user. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 2 

SUBTYPE 75 

VAL 2 = To delete a function. 


3 = To add a function (with default attributes). 


9 = To add a function with attributes or to change the attributes of a 
function. 


ARRAYROW A[0] = 2 
All] = 0 
A[2] through A[4] = Function name in substandard form. 


A[5] through A[n] = File title in standard form. Not used if 
VAL = 2. Required if VAL = 3. Optional if VAL = 9. 


A{n+1] = Number of attributes if VAL = 9. If no file title is 
specified, n is 4. 


Aln+2] through A[A[n+1] + n+1] = Attribute assignments. 
Each attribute assignment occupies one word of the ARRAYROW parameter. The 


attribute number is placed in bits [31:08], and the attribute value is placed in bits 
[23:24]. The following attributes can be used: 


Number Name Type 
1 LINKCLASS Integer (range = O to 15) 
2 ONEONLY Boolean 
3 TRUSTED Boolean 
4 MCPINIT Boolean 
6 SYSTEMFILE Boolean 
Call 


RSLT := SETSTATUS (2, 75, VAL, A); 
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Results 


The following soft error codes can be returned for this call: 


Soft Error Number Description 

10 INVALID NUMBER (The attribute number is not valid.) 

18 NOT A CODE FILE 

49 NO FILE (Library code file is not resident.) 

56 INVALID SYNTAX (No file title is specified for VAL = 3.) 

59 NAME TOO LONG 

89 UNIT(S) TO BE SAVED (File title is not in standard form.) 

119 SIMPLE NAME ERROR (A function name is required.) 

214 CODEFILE NOT LIBRARY CAPABLE 

215 CANNOT CHANGE A SYSTEM LIBRARY (Cannot use the SL call on 
a system library.) 

216 FUNCTION WAS NOT ESTABLISHED (Function is not present.) 

217 CAN'T BE MODIFIED WHILE IN USE 

218 SLED FILE NOT PUBLIC 


A successful SETSTATUS call and nonzero A [1].[46:08] indicates that either the 
pending title is removed (VAL = 2), or the new title is pending (VAL=3). A successful 
SETSTATUS call with nonzero A [1].15:16] indicates a warning. The value in 

A [1].[15:16] contains the warning number: 


Warning Number Message 
941 - CODEFILE IS TADS-CAPABLE 
Examples — 


For the system command SL USERFUNCTION = SYSTEM/ USERLIBRARY, use the 
following input: 


A[@] <= 2 

A[1] <= 9; 

REPLACE POINTER (A[2]) BY 48"@C" 8"USERFUNCTION"; 
REPLACE POINTER (B) BY "SYSTEM/USERLIBRARY"; 
DISPLAYTOSTANDARD (POINTER (B), POINTER (A[5])); 
RSLT := SETSTATUS (2, 75, 3, A); 


For the system command SL~ USERFUNCTION, use the following input: 
A[@] := 23 
A[1] := @ 


REPLACE POINTER (A[2]) BY 48"@C" 8"USERFUNCTION"; 
RSLT := SETSTATUS (2, 75, 2, A); 
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For the system command SL USERFUNCTION = *SYSTEM/LIBRARY : LINKCLASS 
= 2, TRUSTED, use the following input: 


A[@] := 2; 

A[1] := 9; | 
REPLACE POINTER (A[2]) BY 48"@C" 8"USERFUNCTION"; 
REPLACE POINTER (A[5]® BY 48"16928206" 

8"SYSTEM" 48"9B" 
8"USERLIBRARY"; 


A[1@] := 2 & 1 [31:88]; % Linkclass = 2 
A[11] := 1 & 3 [31:98]; % Trusted 
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This call corresponds to the system command OP (Options). Use this call to turn various 


options on. 


Input 


Use the following input for this call: 


Paramete 
TYPE © 
SUBTYPE 
VAL 


ARRAYROW 


Call 


r 


Value or Description 

2 

0 

1 

ALO} = Number of options + 1 


A(1} through A[(A[0}-1)} = Option list; one option member per word 
in [15:16] of that word 


RSLT := SETSTATUS (2, 8, 1, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number 


5 
10 
194 


Example 


Message 

IT CANT BE DONE 

INVALID NUMBER 

DISK MIRRORING ALREADY SET 


For the system command OP + 1,7,9,15, use the following input: . 


A[8] 
A(1] 
A(2] 
A[3] 
A[4] 
RSLT 
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+ 
 SETSTATUS (2, 8, 1, A); 
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SQUASH Call 


Use this call to move in-use areas on disk so that fragmented disk allocation is reduced 


9-94 


and larger available areas are created. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 12 

VAL 4 

ARRAYROW A[0] = Length of the request in words 


A{1] = Family index 
A[3] = Length of family name in characters + 1 


A[4] = Family name in substandard form 


Call 


RSLT := SETSTATUS (2, 12, 4, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

60 | INVALID PARAMETER INDEX 

63 PARAMETER LENGTH ERROR 
Example 


For the system command SQUASH PRODUCTION (1), use the following input: 


A[@] : 
A[1] : 
A[2] := @; 
A[3] := 11; ; 
REPLACE POINTER (A[4], 8) BY 48"@A" 8"PRODUCTION"; 
RSLT := SETSTATUS (2, 12, 4, A); 
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Use this call to send a message to data comm stations identified either by station name 


or by LSN. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 
ARRAYROW 


Call 


Value or Description 
2 

19 

0 


A[O] = Index of the word. in the array that contains the length of the 
message in characters. . 


A({1] through A[(A[0]-1)] = Station list. The layout of each entry in 
the list is as follows: 


e A{n).[38:06] = Number of words that follow as part of the 
current entry. 


e A(n).[15:16] = LSN if field [15.16] equals 0. 


A{n+1] through end of entry = Station name in standard form if 
A[{n].[38.06] is greater than 0. 


A[A[0]+1] through end = Message. 


RSLT := SETSTATUS (2, 19, @, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number 
10 
73 
74 
75 
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Message 

INVALID NUMBER 
UNKNOWN STATION 
DATACOM INACTIVE 
INACTIVE STATION 
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~ 


Example 


For the system command SS FRED 14,: HI THERE, use the following input: 


A[@] := 5; | 

A[1] := @ & 2 [38:6]; 

REPLACE POINTER (A[2], 8) BY 48"98010194" 8"FRED"; 
A[4] := @ & 14 [15:16]; | 

A[5] := 8; 

REPLACE POINTER (A[6], 8) BY "HI THERE" FOR 8; 
RSLT := SETSTATUS (2, 19, @, A); 
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Use the SUPPRESS call to prevent jobs or tasks from appearing in the mix while they 


are active. 


Input 


Use the following input for this call: 


Parameter | 


TYPE 
SUBTYPE 
VAL 


ARRAYROW 


Call 


Value or Description 

2 

8 

4 = Unsuppresses a program 

5 = Suppresses a program display in mix 
A[0} =2 

A{2] through end = File title in standard form 


RSLT := SETSTATUS (2, 8, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number 


255 


Example 


Message 

PREVIOUSLY DONE (File does not need to be changed.) 

INVALID FILE TYPE (File is not properly structured.) 

NO FILE (File is not present.) 

INVALID PARAMETER INDEX (Index name is too large.) 
PARAMETER LENGTH ERROR (Length of name is too large.) 

FIVE CHARS REQ (Standard form name is badly formed.) 

INVALID STANDARD FORM (Standard form name is badly formed.) 


CODEFILE INCOMPATIBLE WITH THIS MCP VERSION (File is not 
properly structured.) 


For the system command SUPPRESS *MYPROGRAM, use the following input: 


A[@] := 23 


REPLACE POINTER (A[2]) BY 48"6D@20109" 8"MYPROGRAM" ; 
RSLT := SETSTATUS (2, 8, 5, A); 
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SUPPRESSWARNING Call 
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Use this call to modify the list of warning messages that the system can display. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 2 
SUBTYPE 78 
VAL 0 
ARRAYROW A[OQ] = 2 
AC1] = NA. 


A[2] = Number of words following that contain warning numbers. If 
this number is positive, these warning numbers are to be added to 
the list of suppressed warnings. If this number is negative, these 
suppressed warnings are to be subtracted. If A[2] = —1 then A[3] 
has to be given a text string value of either ALL (to suppress all 
warnings) or NONE (to suppress no warnings). 


A[3] through end = List of warnings to be suppressed or 
unsuppressed. A range of warnings can be specified by making one 
of these values negative. For example, to suppress warnings 5-8, 
make A[3] equal —5 and make A[4] equal 8. 


Call 


RSLT := SETSTATUS (2, 78, @, A); 


Results 


This call does not generate any unique soft errors. 


Example 
For the system command SUPPRESSWARNING 3,5—8, use the following input: 


A[@] 
A(1] 
A[2] 
A[3] 
A[4] 
A[5] := 83 

RSLT := SETSTATUS (2, 78, @, A); 


eo 
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SUSPEND/RESUME Call 


The SUSPEND/RESUME call allows DCALGOL programs running under privileged 
usercodes to suspend and resume processes. The SUSPEND call also halts scheduling of 
new processes until the suspended task process is reactivated. 


The program can designate the affected task by means of a mix number, or SETSTATUS 
can select an appropriate task. In the latter case, SETSTATUS uses the same algorithm 
as WSSHERRIFF. Among tasks with lowest priority, the most recently started is 
suspended; among suspended tasks of highest priority, the least recently started is 
resumed. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 2 
SUBTYPE 37 
VAL.[00:01] = Suspend. 
O = Resume. 
ARRAYROW A{O] = 2 (Number of words in entry.) 


A[1] = 0 (SETSTATUS selects the task.) 


A(1] greater than O = A[1] is the mix number of the process to be 
resumed or suspended. 


Call 


RSLT := SETSTATUS (2, 37, VAL, A); 


Results 
SETSTATUS returns the mix number of the affected task in A[1]. 


If SETSTATUS cannot perform the requested action, soft error 5 (“IT CANT BE 
DONE”) is returned. If a mix number is specified, the given task was not in an 
acceptable state; otherwise, an error indicates that no tasks on the system were in an 
acceptable state. | 


Any suspended task is resumable. However, to be suspendable, a task must meet the 
following criteria: 
e The task must be visible (not an invisible independent runner). 


e The task must be normal (not discontinued, DUMPING SUSPENDED, and so 
forth). 


e The task must not be a SORT job. 


e The task must not be a control program. 
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Example 
The following is an example of SUSPEND/RESUME code: 


REAL ARRAY A[@:4]; 
REAL MIXNUM; , 
% THE FOLLOWING WILL SUSPEND TASK WITH MIX #1234 
A[@] := 2; 
A[1] := 1234; 
IF SETSTATUS(2,37,1,A) THEN 
BEGIN 
% TASK 1234 WAS NOT SUSPENDABLE 
END; 
% THE FOLLOWING WILL RESUME A SYSTEM-SELECTED TASK 
A[1] := 9; 
IF SETSTATUS(2,37,0,A) THEN 
BEGIN 
% NO SUSPENDED TASKS TO RESUME 
END 
ELSE 
BEGIN 
MIXNUM: = A[1]; 
% MIXNUM CONTAINS MIX NUMBER OF RESUMED TASK 
END; 
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SYSTEMACCOUNTING Call 


Use the SYSTEMACCOUNTING call to set systemwide attributes for dependent task 
accounting and file accounting. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 85 

VAL 0 

A [0] 3 

A[1).[38:06] 1 

A[1).[15:15) O = Set dependent task accounting 


1 = Set file accounting 

A [2] O = UNSPECIFIED accounting 
1 = ANONYMOUS accounting 
2 = IDENTIFIED accounting 


Call 


RSLT := SETSTATUS (2, 85, @, A); 


Results 


Possible soft error values for the SYSTEMACCOUNTING call include the following: 


Soft Error Number Message 

60 INVALID PARAMETER INDEX 
63 ~ PARAMETER LENGTH ERROR 
69 INVALID VALUE 

81 FIVE CHARS REQ 

82 INVALID STANDARD FORM 
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Example 


For the system command SYSTEMACCOUNTING DEPENDENTTASK IDENTIFIED, 
use the following input: 


’ A[@] := 3; 
A[1] := @ & 1 [38:6]; 
A[2] := 2; 
RSLT := SETSTATUS (2, 85, @, A); 
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SYSTEMLANGUAGE Call 


Use this call to designate the default language to be used for system messages. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 65 

VAL 0 

ARRAYROW A(O] = Number of words of data. Must be greater than 2. 


A{i] = Length of language string in bytes. 
A[2] = Start of language string. 
Call 


RSLT := SETSTATUS (2, 65, @, A); 


Result 


No unique soft errors are returned for this call. 


Example 

For the system command SYSTEMLANGUAGE ENGLISH, use the following input: 
A[@] := 53 
A(1] := 7; 


REPLACE POINTER (A[2]) BY "ENGLISH"; 
RSLT := SETSTATUS (2, 65, @, A); 
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TL Call 


This call corresponds to the TL (Transfer Log) system command. Use this call to release 
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the current system log file and to start a new one. 


Input 


Use the following input for this call: 


Parameter 


TYPE 
SUBTYPE 
VAL 


ARRAYROW 


Call 


RSLT := 


Results 


SETSTATUS returns no unique soft errors for this call. 


Example 


For the system command TL, use the following input: 


A[@] : 
RSLT : 


Value or Description 
2 
22 


SETSTATUS (2, 22, 0, A); 


23 
SETSTATUS (2, 22, @, A); 
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TR Call (Old Version) 


This is the version of the call used by already existing programs that change the system 
time of day. This call can also change the date. The time is designated to be on the 
24-hour clock. For new programs, use the extended version of the call that immediately 
follows in this manual. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 14 

VAL 0 

ARRAYROW Refer to the values that follow. 


If you are changing the time only, array A should contain the following: 


Array A Value or Description 
A[O] 5 

A(1) 0 & 3 [38:06] 

A(2] Hours 

A(3] Minutes 

A[4] Seconds 


If you are changing both time and date, array A should contain the following: 


Array A Value or Description 

A{O] 9 

A(1] 0 & 7 [38:06] 

A[2] Hours 

A[3] Minutes 

AL4] Seconds 

AL5] Month 

A[6] Day of month 

A[7] Year 

A[8] Day of week: 0 = Sunday, 1 = Monday, and so on 
Call 


RSLT := SETSTATUS (2, 14, 8, A); 
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Results 


This call can return the following soft errors: 


Soft Error Number Message 

10 INVALID NUMBER (In time field) 

11 ADDITIONAL INFO REQUIRED 

64 | INVALID DAY 

65 INVALID YEAR 

72 INVALID MONTH 

92 REQUIRED LOCK IS IN USE ~ TRY LATER 
Examples 


For the system command TR 11, which changes the time only, use following input: 


A[@] := 33 

A[1] := @ & 1 [38:96]; 

A[2] := 11; 

RSLT := SETSTATUS (2, 14, @, A); 


For the system command TR 11:05:47, which changes the time only, use the following 


input: 
A[@] := 53 
A{1] := @ & 3 [38:96]; 
A[2] := 11; 
A[3] := 53 
A[4] := 47; 
RSLT := SETSTATUS (2, 14, @, A); 


For the system command TR WEDNESDAY JANUARY 12, 1977, which changes the 


date, use the following input: 
A[@] := 73 
A[1] := 9 & 5 [38:96]; 
A[2] := 11; 
A[3] := 1; 
A[4] := 12; 
A[5] := 1977; 
A[6] := 3; % @ is Sunday, 6 is Saturday 
RSLT := SETSTATUS (2, 14, @, A); 


9-106 , 8600 0346-000 


SETSTATUS Request Type 2 (Miscellaneous Requests) 


For the system command TR 11:05:47 WEDNESDAY JANUARY 12, 1977, which 
changes the time and date, use the following input: 


A[@] := 9; 

A[1] := 8&7 [38:86]; 

A{2] := 11; 

A[3] := 53 

A[4] := 47; 

A[5] := 13 

A{6] := 12; 

A(7] := 1977; 

“A[8] := 33 

RSLT := SETSTATUS (2, 14, @, A); 
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TR Call (Extended Version) 


Use this version of the call for new programs that change the system time of day, the 
time zone, the date, or all three. The time is designated to be on the 24-hour clock. For 
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new programs, 


Input 


Use the following input for this call: 


Parameter 


TYPE 
SUBTYPE 
VAL.[4:01] 


VAL.[3:02] 


VAL.[1:02] 


ARRAYROW 


Value or Description 

2 

14 

DATECHANGEF, as follows: 

e 0 = Date is not being changed. 

e 1 = Date is being changed. 

TIMEZONECHANGEF, as follows: 

@ 0 =Time zone is not being changed. 

@ 1 = Time zone is being cleared. 

@ 2 = Time zone is being set to a predefined value. 

e 3 = Time zone is being set to a custom value. 
TIMECHANGEF, as follows: 

e 0 = Time is not being changed. 

e 1 = Hours are being designated. 

e 2 = Hours and minutes are being designated. 

@ 3 = Hours, minutes, and seconds are being designated. 
A[0] = 21. 

A[1] = 0 & 19 [38:06]. 

A [2] = If setting time, the new value for hours (0 through 23). 


A [3] = If setting minutes, the new value for minutes (0 through 
59). 


A [4] = If setting seconds, the new value for seconds (0 through 
59). 


A[5] = If setting the date, the new value for month (1 through 12). 
A [6] = If setting the date, the new value for day (1 through 31). 


A[7] = If setting the date, the new value for year (1900 through 
1999). : j 


A [8] = If setting the date, the new value for the day of the week (0 
through 6). 0 is Sunday and 6 is Saturday. 


A [9] = If setting the time zone to a predefined value, the new 
predefined time zone number (1 through 31). 


continued 
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continued 


Parameter 


Value or Description 


A[10] = If setting the time zone to a custom value, the new offset 
value: 


e 1 = Universal time (UT) plus offset produces local time. 
@ 2 = UT minus offset produces local time. 


A[11] = If setting the time zone to a custom value, the new hours 
offset (0 through 23). 


A [12] = If setting the time zone to a custom value, the new 
minutes offset (O through 59). 


A[13] through A [20] = If setting the time zone to a custom value, 
the new time zone in substandard form (with a maximum of 35 
characters) followed by the abbreviation in substandard form (with a 
maximum of 6 characters). 


The following table lists the predefined time zones: 


Number 


wo On OO oO fF W DN & 


8600 0346-000 


Name Abbreviation Offset 

. Alaska Standard Time (AKST) -9:00 
Alaska Daylight Time (AKDT) -8: 00 
Pacific Standard Time (PST) -~8:00 
Pacific Daylight Time (PDT) -7:00 
Mountain Standard Time (MOST) -7:00 
Mountain Daylight Time (MODT) -6:00 
Central Standard Time (CST) -6:00 
Central Daylight Time (CDT) -5:00 
Eastern Standard Time (EST) -5: 00 
Eastern Daylight Time (EDT) ~4:00 
Atlantic Standard Time (AST) -4:00 
Atlantic Daylight Time (ADT) -3:00 
Greenland Standard Time (GST) -3:00 
Greenland Daylight Time (GDT) —-2:.00 
Newfoundland Standard Time (NST) -3: 30 
Newfoundland Daylight Time (NDT) -2: 30 
Hawaii-Aleutian Standard Time (HST) -10: 00 
Hawaii-Aleutian Daylight Time (HDT) -9: 00 
Greenwich Mean Time (GMT) or (GCT) + 0:00 
British Summer Time (BST) +1:00 
Central European Standard (CEST) +1:00 
Time 

continued 
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continued 


Number 
22 


23 
— 24 


25 
26 
27 
28 
29 


30 
31 
32 
33 


34 


Call 


Name 


Central European Daylight 
Time 


Eastern European Standard 
Time 


Eastern European Daylight 
Time 


Indian Standard Time 
Hong Kong Standard Time 
Chinese Standard Time 
Japanese Standard Time 


Eastern Australian Standard 
Time 

Eastern Australian Daylight 
Time 

Central Australian Standard 
Time 

Central Australian Daylight 

Time 


Western Australian Standard 
Time 


Western Australian Daylight 


Time 


RSLT := SETSTATUS (2, 14, VAL, A); 


Results 


This call can return the following soft errors: 


Soft Error Number 
10 

11 

64 

65 

72 

92 

139 


Message 


‘Abbreviation 
(CEDT) 


(EEST) 


(EEDT) 


(IST) 
(HKST) 
(CHST) 
(JST) 
(EAST) 


(EADT) 


(CAST) 


(CADT) 


(WAST) 


(WADT) 


5 


INVALID NUMBER (In the time field.) 
ADDITIONAL INFO REQUIRED 


INVALID DAY 
INVALID YEAR 
INVALID MONTH 


REQUIRED LOCK IS IN USE — TRY LATER , 
INVALID TIME (The hours, minutes, seconds, or both minutes and 


seconds of the new designated time are not within the valid range of 


Offset 


+2: 


+2: 


+ 3; 


+)5% 
+8: 
a8: 
aie Je 
+10: 


+11: 


+9: 


+10: 


+8: 


+9; 


00 


00 


00 


30 
00 
00 
00 
00 


00 


30 


30 


00 


00 


0 through 23 for the hours and O through 59 for the minutes and 


seconds.) 
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continued 

Soft Error Number Message . 

140 INVALID DAY OF WEEK (The designated day of the week either does 
not match the designated day and month or is not in the range of 0 
through 6.) 

141 INVALID TIME ZONE (The predefined time zone number that you 
designated is less than or equal to zero or larger than the maximum. 
You can call SYSTEMSTATUS to find out the maximum value.) 

142 INVALID OFFSET DIRECTION (The designated offset direction for a 
custom time zone is neither 1 nor 2.) 

143 INVALID OFFSET VALUE (The hours, minutes, or hours and minutes 
that you designated for a custom time zone are not within the valid 
ranges of 0 through 23 for the hours and O through 59 for the 
minutes.) 

Examples 


For the system command TR 11:05:47, which changes the time only, use the following 


input: 


A[@] 
A[1] 
A[2] 
A[3] 
A[4] 


e 
e 


21s 
@ & 19 [38:86]; 
11; 
53 
47; 


RSLT := SETSTATUS (2, 14, 3, A); 


For the system command TR 11:05:47 PM WEDNESDAY JANUARY 11, 1991, which 
changes the time and date, use the following input: 


A[@] 
A(1] 
A[2] 
A[3] 
A[4] 
A[5] 
A(6] 
A[7] 
A[8] 
RSLT 
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° 
e 
e 
e 
° 
e 
° 
. 
e 
e 
e 
e 
° 
e 
e 
e 
e 
e 
e 
e 


213 

@& 19 [38:86]; 

23: 

5; 

47; 

1; 

11; 

1991; 

i % ®@ is Sunday, 6 is Saturday 
SETSTATUS(2, 14, 3 & (1) [4:91], A); 
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For the system command TR 15:30 WEDNESDAY JANUARY 11, 1991, which changes 
the time and date with a 24-hour clock, use the following input: 


A[@] : 
A[1] : 
A[2] : 
A[3] : 
A[5] : 
A[6] : 
A[7] : 
A[8] : 
RSLT : 


21; 

@ & 19 [38:86]; 

153 ‘ 

30; 

1; 

11; 

1991; 

3; % ® is Sunday, 6 is Saturday 
SETSTATUS (2, 14, 1 & (1) [4:81], A); 


For the system command TR 11:05 TIMEZONE PST, use the following input: 


A[@] := 21; 

A[1] := @ & 19 [38:96]; 

A[2] := 11; 

A[3] := 5; 

A[9] := 3; 

RSLT := SETSTATUS (2, 14, 3 & (2) [3:82], A); 


For the system command TR 1300 SUNDAY JUNE 4, 1989 -6 TIMEZONE "Kansas 
City Summer Time" (KCST), use the following input: 


A[@] := 21; 

A[1] := @ & 19 [38:96]; 
A[2] := 13; 

A[5] := 6; 

A[6] := 4; 

A[7] := 1989; 

A[9] := 8; 

A[19] := 2; 

A[11] := 6; 

A[12] .:= 3 


REPLACE POINTER (A[12]) BY 
LENGTH ("Kansas City Summer Time").[7:48] FOR 1, 
"Kansas City Summer Time", 
LENGTH ("KCST").[7:48] FOR 1, 
"KCST"s 
RSLT := SETSTATUS (2, 14, 3 &.(3) [3:92], A); 
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For the system command TR 11:05:47 TUESDAY FEBRUARY 14, 1989 TIMEZONE 
INDIAN STANDARD TIME, use the following input: 


A[9] 
A(1] 
A[2] 
A[3] 
A[4] 
A[5] 
A[6] 
A[7] 
A[8] 
A[9] 
RSLT : 


21; 
®@ & 19 [38:86]; 
11; 
55 
47; 
25 
14; 
1989; 
23 % ® is Sunday, 2 is Tuesday 
25; 
SETSTATUS (2, 14, @ & (1) [4:81] 
& (2) [3:82] 
& (3) [1:82], A); 


For the system command TR 01:12:00 Saturday November 14, 1959 + 0:0 TIMEZONE 
"REEL TIME" (REEL), use the following input: 


A[o] 
A[1] 
A[2] 
A[3] 
A[4] 
A[5] 
A[6] 
A[7] 
A[8] : 
A[19] : 
A[il] : 
A[{12] : 
REPLACE 


oe 


oe oe ry ° oo of 
neue Wn b&b ON nm ot of 


RSLT := 
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21; 
8 & 19 [38:86]; 


6; % ® is Sunday, 6 is Saturday 


nou ott 
QQrev 


POINTER (A[13]) BY 
LENGTH ("Reel Time").[7:48] FOR 1, 
"Reel Time", 
LENGTH ("REEL") .[7:48] FOR 1, 
"REEL"; 
SETSTATUS (2, 14, 8 & (1) [4:81] 
& (3) [3:82] 
& (3) [1:82], A); 
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The examples that follow show system commands that use a fragmentary syntax for 
setting time zones and the corresponding SETSTATUS calls. 


For the system command TR TIMEZONE + 5:40 "Nepal Time" (NT), use the following 


input: 
A[@] := 21; 
A[1] := 0 & 19 [38:96]; 
A[10] := 1; 
A[11] := 53 
A[12] := 48; 


REPLACE POINTER (A[13]) BY 
LENGTH ("Nepal Time").[7:48] FOR 1, 
‘"Nepal Time", 
LENGTH ("NT").[7:48] FOR 1, 
ONT" ; 
RSLT := SETSTATUS (2, 14, @ & (3) [3:92], A); 


For the system command TZ Eastern Daylight Time, use the following input: 


A[@] := 21; 

A[1] := @ & 19 [38:06]; 

A[9] := 19; 

RSLT := SETSTATUS (2, 14, 9 & (3) [3:82], A); 


For the system command TR TIMEZONE NONE, use the following input: 


A[@] : 
A[1] : 
RSLT : 


21; 
8 & 19 [38:96]; 
SETSTATUS (2, 14, @ & (1) [3:92], A); 
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XD Call 


Use this call to eliminate from the available disk table the defective segments on disk. If 
the disk is mirrored, any changes are made to all the members of the mirrored set. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 12 

VAL ar: 

ARRAYROW A(O] = Index of the word in the array A that contains the length of 


the command. 
A{2] = Length in characters of command. 


A[3] = Text of command. The command text should be identical to 
the command except that the letters XD for the command name 
should be removed. 


Call 


RSLT := SETSTATUS (2, 12, 2, A); 


Results 


No unique soft errors are returned for this call. 


Example 


For the system command XD PK 63 SEGMENT 1750000 FOR 30, use the following 
input: 


A[@] := 2; 

A[2] := 28; 

REPLACE POINTER (A[3]) BY "PK 63 SEGMENT 1758900 FOR 38"; 
RSLT := SETSTATUS (2, 12, 2, A); 
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Use the XP call to mark a nonexecutable unsafe code file as an executable unsafe code 
file and vice versa. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 2 

SUBTYPE 8 

VAL 6 = Marks an executable unsafe code file as a nonexecutable unsafe 
code file 


7 = Marks a nonexecutable unsafe code file as an executable unsafe 
code file 


ARRAYROW- A[O] = 2 
A{2] through end = File title in standard form 
If security administrator status is authorized on your system, you must have a security 


administrator usercode to invoke this call. If security administrator status is not 
authorized on your system, you must have privileged status to invoke this call. 


Call 


RSLT := SETSTATUS (2, 8, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

4 PREVIOUSLY DONE (File does not need to be changed.) 

8 INVALID FILE TYPE (File ts not properly structured.) 

49 NO FILE (File is not present.) 

60 INVALID PARAMETER INDEX (Index name is too large.) 

63 PARAMETER LENGTH ERROR (Length of name is too large.) 

81 | . FIVE CHARS REQ (Standard form name is badly formed.) 

82 INVALID STANDARD FORM (Standard form name is badly formed.) 
255 .  CODEFILE INCOMPATIBLE WITH THIS MCP VERSION (File is not 


properly structured.) 
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Example 


For the system command XP *MYPROGRAM, use the following input: 


A[@] := 2; 

A[1] := 9; 

REPLACE POINTER (A[2]) BY 48"8D@20199" 8"MYPROGRAM"; 
RSLT := SETSTATUS (2, 8, 7, A); 
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section 10 
SETSTATUS Request Type 3 
(Directory Requests) 


This section contains information on SETSTATUS calls that change information in 
directories. The calls in this section are arranged in alphabetical order. 


ARCHIVE RECORD ADD Call 


This SETSTATUS call allows DCALGOL programs running under privileged usercodes 
to add a record to or to replace a record in the archive directory for a disk family. 


Input 


Use the following input for this call: 


Parameter | Value or Description 
TYPE 3 
SUBTYPE 2 
VAL 0 
ARRAYROW A{O}] = 
AC1).[38:6] = 


A[2] through A[4] = Disk family name in substandard form. If the 
family name matches the target name of an active family 
substitution statement for the calling process, the primary family 
name is substituted for the designated family name. 


A(6] through end = Contents of the new or replacement archive 
directory record. 


Bits [31:11] of the first word of the archive record (Word 6 in array 
A) must contain the length of the record in words (including the first 
word). The file name to which the archive record applies must be 
embedded in the record itself. The embedded file name must be in 
standard form without a family name, and the security byte must 
have either the value 2 (for a * file) or 3 (for a file name under a 
usercode). Refer to the description of the format of archive directory 
records in the Disk Subsystem Guide. 


Call 


RSLT := SETSTATUS (3, 2, @, A); 
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Results 


If the family name or the file name is not properly formed, SETSTATUS returns hard 
error 44. , 

If the record (as indicated by its length in bits [31:11] of its first word) extends beyond 
the end of the array, SETSTATUS returns hard error 57. 


_ If the named family is not online or does not have an active archive directory, or if an 


error occurs in the archive directory handling routine, SETSTATUS returns hard error 
130. : 


Example 


Suppose that you have a properly formed archive record in an array named ARREC. You 
can enter that record into the archive directory for the disk family named WORKPACK 
as follows: 


A[@] := 6; 
A[1] := @ & 3 [38:6]; 
REPLACE POINTER (A[2]) BY 48"98", 8"WORKPACK"; 
REPLACE POINTER (A[6]) BY POINTER (ARREC) 

FOR ARREC [@].[31:11] WORDS; 
B := SETSTATUS (3, 2, @, A); 
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ARCHIVE RECORD PURGE Call 


This SETSTATUS call allows DCALGOL programs running under privileged usercodes 
to purge a record from the archive directory for a disk family. This call is equivalent to 
the WFL statement ARCHIVE PURGE. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 3 

SUBTYPE 1 

VAL 0 

ARRAYROW A[O] = 6 


A[1).[38:6] = 3 


A(2] through A[4] = Disk family name in substandard form. If the 
family name matches the target name of an active family 
substitution statement for the calling process, the primary family 
name is substituted for the designated family name. 


A[6] through end = File name in standard form. 
Call 


RSLT := SETSTATUS (3, 1, 8, A); 


Results 


If the family name or the file name is not properly formed, SETSTATUS returns hard 
error 44. 


SETSTATUS returns hard error 130 for one of the following reasons: 


e The named file does not have an archive record for the named family in the archive 
directory. 

e The named family is not online. 

e The named family does not have an active archive directory. 


e Anerror occurs in the archive directory handling routine, 
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Example 


For the WFL statement ARCHIVE PURGE MY/FILE(FAMILYNAME = 
WORKPACK), use the following input: 


A[@] := 63 
A[1] := @ & 3 [38:6]; 
REPLACE POINTER (A[2]) BY 48"@8", 8"WORKPACK"; 
REPLACE POINTER (A[6]) BY 
48"9B8192", 48"92", 8"MY"; 
48"94", 8" FILE"; 
B := SETSTATUS (3, 1, 8, A); 
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section 11] 
SETSTATUS Request Type 4 (Disk and 
Tape Volumes) | 


This section contains information on SETSTATUS calls that change information in the 
volume directory. The calls in this section are arranged in alphabetical order. 


VOLUME ADD Call | 


This SETSTATUS call allows DCALGOL programs running under privileged 
usercodes to add a record to the volume directory. This call can be used only if the 
TAPECHECK = AUTOMATIC option of the system command SECOPT (Security 
Options) has been designated on the system. This call corresponds to the WFL 
VOLUME ADD statement. Although the volume directory is changed, the volume 
library is not changed. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 4 

SUBTYPE . i 

VAL 0 

ARRAYROW A{O] = Number of words in the record to be added to the volume 
directory. 


A{1) through A{A[O]] = Contents of the record to be added. The 
format of volume directory records is documented in the Security 
Administration Guide. 


Call 


RSLT := SETSTATUS (4, 1, ®, A); 


8600 0346-000 | 11-1 


SETSTATUS Request Type 4 (Disk and Tape Volumes) 


Results 
Errors are returned in the normal manner. 


Error number 42 is a hard error. The value specified in A[0] is greater than the 
maximum allowed for a record in the volume directory. 
For soft errors, the following codes apply: 

Soft Error Number Message 


227 ERROR PROCESSING VOLUME DIRECTORY REQUEST (The 
request was incorrect, usually because a listed serial number is 
already in the volume directory or the specified record was not 
correctly formed.) 


231 VOLUME DIRECTORY NOT ACTIVE 


Example 


_ For the WFL statement VOLUME ADD SCRATCH (TAPE, SERIALNO = 5646), use 
the following input: 


ARRAY REC [8:280]; % ARRAY IN WHICH TO CONSTRUCT VOL DIR RECORD 


% DEFINITION OF THE STRUCTURE OF A VOLUME DIRECTORY RECORD 


DEFINE 
MARKERF = [47:16] #, 
HDRBLOCKLENGTHF = [31:11] #, 


DETERMINES STRUCTURE OF RECORD 
LETTER "D" MEANS DATA BLOCK 
TAPE LABELTYPEL IN [3:4] 
& LABELTYPES IN [4:1] 
(@ FOR SCRATCH TAPES) 
MCP RELEASE LEVEL FOR THIS VOLUME 
DIRECTORY DATA BLOCK STRUCTURE 


VSTYPEX = 1 #, 
VSRECF = [47:8] #, 
VSLABELTYPEF = [39:8] #, 


“VSLEVELF = [31:8] #, 


de od de de oe oe o& oe 


VSTYPEF = [15:4 KIND OF RECORD 
VSTPGMTV = 1 #, % SCRATCH TAPE 
VSTMTIV = 2 #, % NON-SCRATCH TAPE 
VSTPKV = 3 #, % DISK OR PACK 
VSWILDF = [19:1] #, % DON'T NEED TO MATCH FAMILY NAME, 
% CREATION DATES, ETC. 
VSVARF = [ 9:16] #, % INDEX TO START OF VARIABLE LENGTH 
% STUFF; RECORDS PRODUCED BY 


VSTIMESTAMPX = 2 #, % DATE & TIME WHEN THIS RECORD 
CHANGED OR UPDATED. 

DATE FIRST VOLUME IN FAMILY WAS 

ON FIRST TAPE IN VOLUME SET 

CREATION SITE SYSTEM SERIAL 
(BINARY) 


VSDATEX = 3 #, 


VSCRINSITEX = 4 #, 


dH df dP de of 
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VSSAVEX = 5 #, SAVEFACTOR OF FIRST FILE ON FIRST 


TAPE VOLUME. 


% 
% 
VSUSERX = 6 #, % OWNER OF TAPE (3 WORDS): 
% NORMALLY LENGTH BYTE FOLLOWED BY 
% USERCODE. BUT THERE ARE 
% SPECIAL CASES: 
% FIRST BYTE = @ MEANS UNOWNED 
VSASTERISK % THIS PATTERN MEANS OWNED BY * 
= 48"9290" & Moe tt #, 
VSFAMILYX = 9 #, % VOLUME NAME (3 WORDS) 
VSSECURITYX = 12 #, % SECURITY ATTRIBUTES FOR TAPE FILE 
% THE VOLUME SET. 
VSSECTYPEF = [47:2] #, % SECURITYTYPE 
VSSECUSEF = [45:2] #, % SECURITYUSE 


% EVERY LINK WORD IS LAID OUT AS FOLLOWS 
VSLINKEDF = [47:1] #, 1 MEANS WORD HAS VSSIZEF & VSLINKF 


VSSIZEF = [23:12] #, % LENGTH OF EACH ENTRY (WORDS) 
VSLINKF = [11:12] #, % INDEX TO STUFF IN VARIABLE PART 
VSMEMSNSX = 16 #, % LINK TO FAMILY SERIALNO LIST 
% SERIAL NUMBERS ARE STORED IN EBCDIC 
VSMEMTYPSX = 17 #, % LINK TO FAMILY STATUS LIST 


% FORMAT OF EACH FAMILY STATUS WORD IS: 
VSPERMF = [47:1] #, 1 IF USERCODE SHOULD RETAIN OWNERSHIP 
VSTRUSTF = [46:1] #, 1 IF OK TO ALLOW DANGEROUS FILES TO 
TO BE COPIED FROM TAPE. 
VSDSTRYF = [45:1] #, VOLUME DESTROYED 
VSKINDF = [5:6] #, TAPE, 7TRK, O9TRK, PE; . DISK, PACK 
VSGUARDX = 18 #, % LINK TO GUARDFILE TITLE OR 9. 
VSVARSTX = 19 #; 


FH 3 HW FS 


REC [VSTYPEX ] := VSVARSTX & 1 VSTYPEF 
& 37 VSLEVELF & @ VSLABELTYPEF 
& 8"D" VSRECF; 
% GET DATE (YYDDD) AND CHANGE IT TO BINARY 
REC [VSDATEX ] := TIME (18); 
REC [VSDATEX ] := INTEGER (POINTER (REC [VSDATEX])+1, 5); 
REC [VSCRTNSITEX ] := TIME (23).[23:16]; % SYSTEM SERIAL NUMBER 
REC [VSUSERX ] := 9; % NO OWNER 


REPLACE POINTER (REC [VSFAMILYX ]) BY 48°97" 8"SCRATCH"; 


REC [VSSECURITYX ] := @ & 3 VSSECTYPEF % PRIVATE 
& @ VSSECUSEF; % 1/0 


REC [VSMEMSNSX ] := VSVARSTX & 1 VSSIZEF & 1 VSLINKEDF; 

REPLACE POINTER (REC [VSVARSTX ]) BY 5646 FOR 6 DIGITS; % SERIALNO 
REC [VSMEMTYPSX ] := (VSVARSTX + 1) & 1 VSSIZEF & 1 VSLINKEDF; 

REC [VSVARSTX + 1] := 15 & 1 VSTRUSTF; 

REC [@] := @ & 4"3F3F" MARKERF & (VSVARSTX+3) HDRBLOCKLENGTHF; 
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A[@] := REC [0].HDRBLOCKLENGTHF + 1; 
REPLACE POINTER (A[1]) BY POINTER (REC) 
FOR REC [@].HDRBLOCKLENGTHF WORDS; 


RSLT := SETSTATUS (4, 1, 9, A); 
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VOLUME DELETE Call 


The VOLUME DELETE call allows DCALGOL programs running under privileged 
usercodes to delete one or more volume serial numbers from a volume directory, but not 
from a volume library. This call can only be used if the TAPECHECK = AUTOMATIC 
option of the SECOPT (Security Options) system command has been designated on the 
system. This call is similar to the WFL VOLUME DELETE statement, except that the 
SETSTATUS call applies only to the volume directory and not to the volume library. 


¢ 


Mmput 


Use the following input for this call: 


Parameter Value or Description 

TYPE 4 

SUBTYPE 0 

VAL 0 

ARRAYROW A{O] = Length of the request. 


AL[1] = 12 (tape). 


A[2] through A[4] = Volume family name in substandard form, such 
as 48"04" "TAPE". 


A[5] = Number of serial numbers specified, in the range 1 to 255, 
inclusive. 


A[6] through A[A[O]] = The serial numbers to be removed. All the 
serial numbers should belong to one volume family. Each serial 
number consists of 6 EBCDIC characters. Serial numbers that 
contain characters other than digits and are less than 6 characters 
long should be left-justified and filled with trailing blanks; serial 
numbers that are completely numeric should be right-justified and 
filled with leading EBCDIC zeros. 


Call 


RSLT := SETSTATUS (4, 1, &, A); 


Results . 
Errors are returned in the normal manner. 


For hard error number 42, either the value designated in A[0] or A[5] is incorrect or the 
number of characters designated for the name of the volume family is greater than 17. 
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The following soft errors can be returned: 
Soft Error Number Message 


227 ERROR PROCESSING VOLUME DIRECTORY REQUEST (The delete 
. request was incorrect, usually because a serial number you listed is 
not present in the volume directory or the volume name did not 
match the name in the directory.) 


231 VOLUME DIRECTORY NOT ACTIVE 
Example 


For the WFL statement VOLUME DELETE LMTAPE (SERIALNO = 123456, TAPE), 
use the following input: 


A[@] := 73 
A[1] := 12; 
REPLACE POINTER (A[2]) BY 48"@6" 8"LMTAPE"; 
A[5] := 1; 


REPLACE POINTER (A[6]) BY 123456 FOR 6 DIGITS; 
RSLT := SETSTATUS (4, 8, @, A); 
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Section 12 


SETSTATUS Request Type 5 


(Unit Requests) 


Request Type 5 calls are used to change the status of peripheral units or other hardware 
components. Most of these calls correspond to a system command; they are arranged 


alphabetically by name. 


The following is a summary list of Request Type 5 calls: 


Call Name 
AB 


ACQUIRE 


ADM 


FORM 


FREE 
LB 


LH 


MIRROR CREATE 
MIRROR OPTION 


MIRROR RELEASE 
MODE 


MOVE 
PA 


PG and PGL 


POWER 
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SUBTYPE 
9 


15 


28 


10 


15 


11 


17 


12 


Description 


Turns on and off the automatic backup 
mark for card punch and printer units. 


Allows the system to use selected 
hardware resources. 


Starts or stops the automatic display of 
current system status information. 


Assigns, modifies, or cancels a device 
according to the special forms designated 
by FORMID. 


Prohibits the system from using certain 
hardware resources. 


Changes the family name, volume serial 


_ number, or name of the owner of a pack. 


Loads the pack controlware file to the . 
designated disk pack controller for EMS 
systems. 


Creates a mirrored disk set. 


Designates recovery options for a mirrored 
set. 


Releases a pack from a mirrored set. 


Informs the MCP that the write-enabled 
status of the unit has been changed. 


Moves a native-mode disk pack to another 
drive, even if the pack is in use. 


Creates or terminates associations 
between input and output devices. 


PG purges tape, disk pack, or host control 
units. PGL locks the tape units after they 
have been purged. 


Powers disk packs up or down. 


continued 
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continued 
Call Name 
RC 
REPLACE 
RESTRICT DK, MT, or PK 
RESTRICT ODT 
RW 


RY 


SCAN 


SEND 
SN and SNL 


SR 


SV 
TERM 


UR 
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6 


22 


33 


23 


24 


29 


4or 20 


Description 


Groups hardware resources to either the 
designated group or to the default 
designation. 


Initiates a pack volume replacement 
operation. 


Turns on or off security related restrictions 
for any unit. 


Turns on or off security-related restrictions 
for the ODT. 


Rewinds, unloads, and locks magnetic 
tape units. 


Readies units, storage interface modules 
(SIMs), and memory subsystem modules 
(MSMs)._ - 


Reads a pack or disk volume; analyzes 
and records read errors. 


Sends a message that communicates with 
the image printer host support library, or 
network processor support library. 


Purges and assigns serial numbers to tape 
volumes and designates their recording 
density. 


Causes the system to reject all card decks 
without a USER statement. 


Saves units, SIMs, and MSMs. 


Controls whether or not the designated 
ODT should behave like a data comm 
terminal and whether or not the 
end-of-text (ETX) character is to be used. 


If the ODT should behave like a data 


comm terminal, ETX should not be used. 


Reserves a unit for maintenance or 
releases a unit that was previously 
reserved for maintenance. 


8600 0346-000 


SETSTATUS Request Type 5 (Unit Requests) 


AB Call 


SETSTATUS can still be called to turn on or off the auto backup mark for card 

punch and printer units. However, the form of the AB command used to establish 
the maximum count of printer and punch tasks can no longer be reached with a 
SETSTATUS call. That function has been taken over by the Print Router subsystem. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 5 

SUBTYPE 9 

VAL O = For AB <unit> 
1= For AB —- <unit> 

ARRAYROW Af0] = 3 


A{l1] = 0 & 1 [38:6] & UTYPE [31:8] 
A [2] = Unit number 


UTYPE is the numeric code for the card punch or printer device. For printers, UTYPE 
should be 6. For card punches, UTYPE should be 11. For ASID units, UTYPE should be 
26. Refer to the table of hardware resource codes and unit type codes in Appendix C. 


Call 


RSLT := SETSTATUS (5, 9, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 
Soft Error Number Message 


4 PREVIOUSLY DONE (The unit was already designated for automatic 
backup and VAL = 1 in the cail, or the unit was not automatically 
designated for backup VAL = 1 in the call.) 


28 UNIT CORRESPONDENCE (UTYPE was not for a unit that can be 
used for automatic backup output.) 
31 INVALID UNIT NUMBER (The unit number supplied in A [2] was 


out of range, or UTYPE did not match the kind of unit addressed.) 
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Example 
For the system command AB LP 7, use the following input: 


A[@] := 3; 


A[1] := @ & 1 [38:6] & 6 [31:8]; % PRINTER CODE = 6 
A[2] := 7; . 
RSLT := SETSTATUS (5, 9, 8, A); | % AB CALL 
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ACQUIRE Call 


Use the ACQUIRE call to let an active group acquire other resources. This call can 
be used to acquire peripheral units, controls, DLPs, HDUs, memory modules, central 
processors, DTUs, I/O processors (IOPs), ports, and RMMs. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 5 

SUBTYPE 15 

VAL Bits that direct the action to be taken: 


e VAL.[0:1] = If bit O is turned off, the call is for ACQUIRE. ff bit 
O contains a 1, the call is for FREE. 


e VAL.[1:1] = If bit 1 is turned on for ACQUIRE, the unit is to be 
acquired and reserved. 


e VAL.[2:1] = If bit 2 is turned on for ACQUIRE, the unit is to be 
acquired and saved. 


e VAL.[3:1] = If bit 3 is turned on for ACQUIRE, the resource is 
to be acquired with temporary status (it will be freed after the 
next halt/load). 


e VAL.{[4:1] = If bit 4 is turned on for an ACQUIRE call for a 
peripheral unit, the unit is to be acquired with the OVERRIDE 
option. 


ARRAYROW Designates the unit or resource to be acquired or freed. 
The encoding of the A parameter can differ because the required parameter information 
depends on the kind of resource to be acquired and on the kind of system. The following 


text summarizes the various formats of the parameter A. 


Use the following values to ACQUIRE a peripheral unit such as a disk or a printer: 


Array A Value or Description 

A [0] 3 

A(l] 0 & 1 [38:6] & UTYPE [31:8] 
A [2] Unit number 


UTYPE is a numeric code indicating the kind of unit to be acquired. Refer to 
Appendix C for a list of unit types. 
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Use the following values to acquire a base, a control, a data transfer unit (DTU), an MLI, 
or a port on an A 12 or an A 15 system: 


Array A Value or Description 

A [0] 3 

A(1] O & RESTYPE [31:8] & OVERRIDE [23:1] 

A[2] Contains the number of the base, control, DTU, MLI, or port 


RESTYPE is a numeric code indicating the kind of hardware component to be acquired 
(refer to Appendix C for a list of hardware resource codes). OVERRIDE is 1 if the 
ACQUIRE of a DLP is to be done with OVERRIDE. 


Use the following values to acquire a DLP on a system other than an A 12 or anA 15 
system: 


Array A Value or Description 
A[0] 2 
Afi] ~ 0&77 [31:8] 


& OVERRIDE [23:1] & PROCNO [22:3] 
& DLPNO [19:4] & BASENUM [15:16] 


The number 77 is the DLP hardware code. 


OVERRIDE is 1 if an ACQUIRE is to be done with OVERRIDE. PROCNO is the 
number of the processor to which the base is connected. DLPNO is the address of 
the DLP within the base. BASENUM is the base number through which the DLP is 
connected. BASENUM is formatted as follows: 


BASENUM = @ & "base bus address" [13:6] 
& "base bus number" [7:4] 
& "base extension number" [3:4] 


Use the following values to acquire a processor: 


Array A Value or Description 
A[0] 2 
A(i] 0 & 64 [31:8] & PROCID [15:16] 


PROCID is the processor number. 


Use the following values to acquire an RMM: 


Array A Value or Description 
A [0] 2 
A[1] O & 66 [31:8] & RMMID [23:8] 


RMMID is the number of the RMM. 
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Call 


RSLT := SETSTATUS (5, 15, VAL, A); 


Results 


SETSTATUS can return the following soft errors for ACQUIRE: 


Soft Error Number Description 

28 UNIT CORRESPONDENCE (The hardware type code supplied in A 
[1].[31:8] does not match the hardware type code of the unit 
specified.) 

31 INVALID UNIT NUMBER (The unit number supplied in A [2] is out 


of range, or the unit type code supplied in A [1].[31:8] is missing or 
or invalid or does not match the code stored in the MCP unit table. 
Soft error 31 is also produced if other numbers in the array 
parameter fields are invalid.) 


42 INVALID MAIN FRAME TYPE (The hardware type code supplied in A 
[{1].{31:8] is not valid.) 
137 UNIT NOT ONLINE TO GROUP 
180 REQUESTOR TESTING 
Example 


On an A 10 system, for the system command ACQUIRE DLP dd BASE 
ba/bn/be PROC p, use the following input: 


A[@] := 2; 
A{1] := @ & 77 [31:8] 
& p [22:3] & dd [19:4] % PROC NUM & DLP NUM 
& ba [13:6] & bn [7:4] & be [3:4]; % BASE NUMBER 
SETSTATUS (5, 15, @, A); % ACQUIRE CALL 


RSLT : 
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ADM Call 


Use this call to start or stop the automatic display of current system status information. 
You must designate the unit number of the target ODT in the call. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE ; 5 
SUBTYPE 28 
VAL 0 = ADM OK 

1 = ADM ST 
ARRAYROW A[O] = 3 


A[1] = 0 & 1 [38:06] & 2 [31:08] 
A[2] = Unit number of the ODT 


Call 


RSLT := SETSTATUS (5, 28, VAL, A)3 


Results 


SETSTATUS does not return any unique soft errors for this call. 


Example 


For the system command ADM OK (and an ODT with a unit number of 129), use the 


following input: 
A[@] := 3; 
A[1] := @ & 1 [38:86] & 2 [31:98]; 
A[2] := 129; 
RSLT := SETSTATUS (5, 28, @, A); 
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FORM Call 


The FORM call corresponds to the PS CONFIGURE call. Use this call to assign, modify, 
or cancel the FORMID associated with an output peripheral unit. The quoted string is a 
string contained within quotation marks and can be up to 100 characters long. 

This call corresponds to the following system commands: 


PS CONFIGURE <device ID> FORMID = <quoted string> 


PS CONFIGURE <device ID> - FORMID 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 5 

SUBTYPE 10 

VAL O = Assign FORMID configuration to a device 


—1 = Remove FORMID configuration from a device 
ARRAYROW A[O] = Pointer to the standard form message 

A(1].[38:06] = 1 

A[1}.[31:08] = Unit type (refer to Appendix C) 

A[2] = Unit number 

A[3] through end = Message in standard form 


Call 


RSLT := SETSTATUS (5, 10, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 
24 UNIT IN USE 
41 INVALID UNIT TYPE 
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Example 


For the system command FORM LP11 "MOUNT 3-PART", use the following input: 


A[@] := 3; 
A{1] := 9 & 1 [38:96] & 7 [31:08]; 
A[2] := 11; 


REPLACE POINTER (A[3], 8) BY 48"1901919C" 8"MOUNT 3-PART"; — 
RSLT := SETSTATUS (5, 18, @, A); 
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FREE Call 


Use the FREE call to detach resources from an active group. This call can be used to 
detach peripheral units, controls, DLPs, HDUs, memory modules, central processors, 
DTUs, IOPs, ports, and RMMs. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 5 

SUBTYPE 15 

VAL [0:1] = Bit O must be turned on. 
ARRAYROW Designates the unit or resource to be freed. 


The encoding of the A parameter can differ because it depends on the kind of resource to 
be freed and on the kind of system. The following text summarizes the various formats 
of the parameter A. 


Use the following values to FREE a peripheral unit such as a disk or a printer. 


Array A Value or Description 

A[0] 3 

Af{1] O & 1 [38:6] & UTYPE [31:8] 
A [2] Unit number 


UTYPE is a numeric code indicating the kind of unit to be freed. Refer to Hppcade C 


for a table of unit types. 
Use the following values to free a base, a control, a DTU, an IOP or a port on an A 12 or 
an A 15 system: 

Array A Value or Description 

A [0] 3 

Af1) 0 & RESTYPE [31:8] & OVERRIDE [23:1] 

A[2] Contains the number of the base, control, DTU, IOP, or port 


RESTYPE is a numeric code indicating the kind of hardware component to be acquired 
or freed (refer to Appendix C for a list of hardware resource codes). 


Use the following values to free a DLP on a system other than an A 12 or an A 15 


system: 
Array A Value or Description 
A[0] 2 
A(1] 0 &77 [31:8] 


continued 
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continued 
Array A Value or Description 
& OVERRIDE [23:1] & PROCNO [22:3] 
& DLPNO [19:4] & BASENUM [15:16] 


The number 77 is the DLP hardware code. 


PROCNO is the number of the processor to which the base is connected. DLPNO is the 


_ address of the DLP within the base. BASENUM is the base number through which the 


DLP is connected. BASENUM is formatted as follows: 


BASENUM = @ & "base bus address" [13:6] 
& "base bus number" [7:4] 
& "base extension number" [3:4] 


Use the following values to free a processor: 


Array A Value or Description 
A[0] 2 


A{1] O & 64 [31:8] & PROCID [15:16] 
PROCID is the processor number. 


Use the following values to free an RMM: 


Array A Value or Description 
A{[0] 2 
A[1] 0 & 66 [31:8] & RMMID [23:8] 


RMMID is the number of the RMM. 


Call 


RSLT := SETSTATUS (5, 15, VAL, A); 


Results 


SETSTATUS can return the following soft errors for FREE: 
Soft Error Number Description 


28 UNIT CORRESPONDENCE (The hardware type code supplied in A 
{1].[31:8] is not valid. For FREE commands, the unit number 
supplied in A [2] does not address an available unit.) 


31 INVALID UNIT NUMBER (The unit number supplied in A [2] is out 
of range, or the unit type code supplied in A [1°.(31:8] is missing or 
or invalid or does not match the code stored in the MCP unit table. 
Soft error 31 is also produced if other numbers in the array 
parameter fields are invalid.) 


continued 
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continued 
Soft Error Number Description 
39 ONLY ONE PROCESSOR 
42 INVALID MAIN FRAME TYPE (The hardware type code supplied in A 
[1].[31:8] is not valid.) 
150 UNIT NOT CLOSED 
169 BAD EIO RESPONSE 
172 UNIT HUNG 
180 REQUESTOR TESTING 
Example 


For the system command FREE PK 66, use the following input: 


A[@] := 3: 


A[1] := @ & 1 [38:6] & 17 [31:8]; | % DISK PACK CODE = 17 
A[2] := 66; 
RSLT := SETSTATUS (5, 15, 1, A); % FREE CALL 
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LB Call 


Use this call to change the family name, volume serial number, or name of the owner of a 
pack. You can also change a host control unit from SCRATCH to LABELED. You cannot 
change the volume serial number of a member of a multipack family. You cannot relabel 
a unit if the disk pack is not ready or has any files open when the command is issued. 


Input 


Use the following input for this call: 


12-14 


Parameter Value or Description 

TYPE “5 

SUBTYPE 11 

VAL 0 

ARRAYROW A[O] = Total length of input in words 


A[1].[38:06] = Length of the following entry in words, that is, 
A{O] - 2 


Al1].[31:08] = Unit type (refer to Appendix C) 
A{2] = Unit number 
A[3] through end = A list of attributes 


The following characters relate to the data that starts in A [8]: 


Length of attribute list in characters (including this one) 


Character Description or Value 
1 

2 0 

3 Number of attributes 
4 through end Attribute assignments 


The following is the format of attribute assignments: 


Character 
1 


3 forward 


Description or Value 


Length of attribute assignment in characters (not including the 
length character) 


Attribute number: 

e NAME =1 

e SERIAL = 3 

e OWNER =7 

e@ OLDNAME = 11 


Attribute value 
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Call 


RSLT := SETSTATUS (5, 11, @, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

41 INVALID UNIT TYPE 

167 INVALID FOR EXTERNAL !O UNITS 

192 CANNOT LB MIRRORED UNIT 
Example 


For the system command LB PK 46 NAME = ABCDEF SERIAL = 123456, use the 
following input: 


3 


A[@] := 7 
A[1] := 9 


& 5 [38:06] 
& 17 [31:98]; 
A[2] := 46; 
REPLACE POINTER (A[3]) BY 
48"13" FOR 1, 
48"98" FOR 1, 
48"92" FOR 1, 
48"8701" 8"ABCDEF" 
48"6793" 8"123456"; 


oe 


Total length in characters 


“ 


Two attributes 
Len 7 Att 1 (Name) = 
Len 7 Att 3 (Serial) 


Ow 


ABCDEF 
= 123456 


“ 


RSLT := SETSTATUS (5, 11, @, A); 
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LH Call (A 1,A2,A3,A4,A5,A6, AQ, or A 10) 


Use this call to load the pack controlware file to the designated disk pack controller. 
If the specified path is not already reserved, it is automatically reserved before the 


controlware is loaded. Ifa file name is not designated, the default controlware file title is 
determined by the type of the disk pack controller. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 5 

SUBTYPE ee 21 

VAL 0 

ARRAYROW AO) =3 


A[1].[46:01] = 1 

A[1].[44:06] = Path ID 

A[1].[38:06] = 1 

AC1].[31:08] = Unit type (refer to Appendix C) 
A[2] = Unit number 

A[3] to end = Optional file name in standard form 


Call 


RSLT := SETSTATUS (5, 21, @, A); 


Results 


SETSTATUS can return soft error 167 (“INVALID FOR EXTERNAL IO UNITS”) for 
this call. 


Example 


For the system command LH PK 46 PATHID 1, use the following input: 


A[@] := 3; 
A[1] := 6 & 1 [46:01] 
& 1 [44:06] 
& 1 [38:86] 
& 17 [31:88]; 
A[2] := 46; 
RSLT := SETSTATUS (5, 21, ®, A); 
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LH Call (A 12 or A 15) 


Use this call to load a controlware file to a disk pack drive controller by way of the 
designated data link processor (DLP). The DLP must have been previously reserved. 


If a file name is not designated, the default controlware file title is determined by the 
type of the disk pack controller. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 5 

SUBTYPE 16 

VAL 0 

ARRAYROW AlO] = 3 


A(1].[38:06] = 1 

A[1].{31:08] = Controller type 

A[2] = Controller number 

A{3] to end = Optional file name in standard form 


Cali 


RSLT := SETSTATUS (5, 16, 8, A); 


Results ay 
SETSTATUS can return soft error 167 (“INVALID FOR EXTERNAL IO UNITS”) for 
this call. 

Example 


For the system command LH DLP 4007, use the following input: 


A[@] := 3; 

A[1] := @& 1 [38:96] 
& 77 [31:88]; 

A[2] : 


4087; 
$s 


RSLT := SETSTATUS (5, 16, 8, A); 
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MIRROR CREATE Call 


Use this call to create a iaierored disk set. The OP + MIRRORING option must be 
turned on before you can use this call. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 
ARRAYROW 


Call 


Value or Description 

5 

25 

0 

ALO] = 5 

A[1}.[38:6] = 1 

Al1).[31:8] = 17 

A[2] = The unit number of the destination unit 
A[3].[38:6] = 1 

A(3].[31:8] = 17 


A[4] = The unit number of the source unit 


RSLT := SETSTATUS (5, 25, @, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number 
4} 

58 

195 

199 
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Message 

INVALID UNIT TYPE 

NOT ALLOWED 

DISK MIRRORING NOT YET SET 
DESTINATION IS A MIRRORED UNIT 
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Example 


For the system command MIRROR CREATE PK44 FROM PK47, use the following 


input: 
A[@] := 5; 
A[i] := 9 & 1 [38:6] 
& 1 [38:6]; % PK 
A[2] := 44; 
A(3] := @ & 1 [38:6] 
& 1 [38:6]; 
A[4] := 47; 


RSLT := SETSTATUS (5, 25, @, A); 
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MIRROR OPTION Call 


Use this call to designate recovery options for any mirrored set. This option determines 
the action to be taken after a halt/load if certain critical MCP information has been lost. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 5 

SUBTYPE 27 

VAL O = Make mirror recovery option equal to DISCARD. 


1 = Make mirror recovery option equal to DMS. 
ARRAYROW A[O] = 3 

A[1].[38:06] = 1 

A[1].[31:08] = 17 

A[2] = Unit number 


The number 17 is the unit type—refer to Appendix C. 


Call 


RSLT := SETSTATUS (5, 27, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

41 INVALID UNIT TYPE 

113 INVALID ATTRIBUTE LIST 

195 DISK MIRRORING NOT YET SET 

198 DESTINATION IS A MIRRORED UNIT | 
Example 


For the system command MIRROR OPTION PK 47 RECOVERY= DMS, use the 
following input: 


A[@] : 
A[1] : 


3; 
@ & 1[38:6] 
& 17[31:8]; % PK 
47; 
SETSTATUS (5, 27, 1, A); 


A[2] : 
RSLT : 
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MIRROR RELEASE Call 


Use this call to release a pack from a mirrored set. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 5 

SUBTYPE 26 

VAL O = Release the specified pack. 


1 = Audit nonpresent copies of the specified pack. 
2 = Audit nonpresent copies of all partial mirrored sets. 


3 = Release offline copies of the specified pack (copies being 
audited). 


4 = Release all copies of the specified pack. 

5 = Ignore all copies of the specified pack (for partial mirrored sets). 
ARRAYROW A[O} = 3 

A[1).138:6] = 1 

A(1).[31:8] = 17 

A{2] = The unit number 


Call 


RSLT := SETSTATUS (5, 26, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

4] INVALID UNIT TYPE . 

195 DISK MIRRORING NOT YET SET 
Example 


For the system command MIRROR RELEASE PK 47, use the following input: 


3 

@ & 1 [38:6] 

& 17 [31:8]; 
473; 
SETSTATUS (5, 26, 8, A); 


A[@] := 
A[i] : 


A(2] : 
RSLT : 
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MODE Call 


12-22 


Use this call to tell the MCP that the write-enabled status of a unit has been changed. 
For an HC unit, if a field for mode value or the hub index of a partner contains 0, no 
value is specified for that field. Therefore, that part of the specification for the unit is 
changed. 


For an HC unit, if a field for the hub index of a partner contains a value greater than 16, 
there is no partner restriction (any existing restriction is removed). 


This SETSTATUS call corresponds to the following system command: 


MODE <unit type> <unit number> <mode value> <partner specs> 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 5 

SUBTYPE 8 

VAL 0 

ARRAYROW A[0] = 4 


A[1].[38:6] = 2 

A(1).[31:8] = The unit type (refer to Appendix C) 
A(2] = The unit number 

A{3].[46:1] = 0 (If unit type is not HC.) 
A[3].[46:1] = 1 (If unit type is HC.) 

A(3].[3:4] = 1 plus the mode value 


If A[3].[46:1] = 1, the following applies: 


A[3].[19:8] = 1 + read partner's hub index 
A[3].[11:8] = 1 + write partner's hub index 


Call 


RSLT := SETSTATUS (5, 8, @, A); 


Results 


SETSTATUS can return the following soft errors for this call: 
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Soft Error Number Message 


24 


UNIT IN USE (An attempt was made to change the specications of 


a designated hub controller.) 


41 INVALID UNIT TYPE (The unit type is not disk, pack, magnetic tape, 
hub controller, or HYPERchannel.) 

52 UNIT NOT AVAILABLE (The unit type is hub controller, and the 
specified unit is in an unacceptable state—for example, it is not 
labeled and not scratched, saved or assigned.) 

173 MUST BE LABELED (An attempt was made to change the partner 
specification for a controller that is not labeled.) 

Examples 


For the system command MODE PK 65 OUT, use the following input: 


A[@] 
A[1] 
A[2] 
A(3] 
RSLT 


2= 4; 

:= @ & 2 [38:6] & 17 [31:8]; % 17 = PK 
s= 65; 

:= VALUE(OUT) + 1; 

3= SETSTATUS (5, 8, 8, A); 


For the system command MODE HC 123 IO WRITEPARTNER = 4 
READPARTNER = 3, use the following input: 


A[@] : 


A[1] 
A[2]} 
A[3] 


RSLT : 
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= 4; 

:= 6 & 2 [38:6] & 28 [31:8]; % 26 = HC 

:= 123; 

:= (VALUE(IO) + 1) & 1 [46:1] % hub controller 

& 4 [19:8] % 1 + read partner 
& 5 [11:8]; % 1 + write partner 

SETSTATUS (5, 8, @, A); 
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MOVE Call 


12-24 


Use this call to move a native-mode disk pack to another drive, even if the pack is in use. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 5 

SUBTYPE 17 

VAL 0 

ARRAYROW A[O] = 5 


A[1).[38:6] = 1 


A(1].[31:8] = The unit type of the unit that contains the disk 
volume to be moved 


A{2] = The unit number of the unit that contains the disk volume to 
be moved 


A(3].[38:6] = 1 
A[3].[31:8] = The unit type of the destination unit 


A[4] = The unit number of the destination unit 


‘ 


Call 


RSLT := SETSTATUS (5, 17, @, A); 


Results 


SETSTATUS can return soft error 167 (“INVALID FOR EXTERNAL IO UNITS”) for 
this call. ‘ 


Example 


For the system command MOVE PK 65 TO PK 73, use the following input: 


A[@] := 53 

A[1] := @& 1 [38:6] & 17 [31:8]; % 17 = PK 
A[2] := 65; 

A[3] := @ & 1 [38:6] & 17 [31:8]; % 17 = PK 
A[4] := 73; 

RSLT := SETSTATUS (5, 17, @, A); 
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PA Call 


Use this call to create or to terminate associations between input and output devices. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 5 
SUBTYPE 12 
VAL O = Delete all previous associations of a unit (example: PA— SC1). 
1= Modify an existing association (example: PASC1=+LP4, 
PA SC1=-LP4). 
2 = Create a new association (example: PASC1=LP4). 
ARRAYROW The information in the array A depends on VAL. 


If VAL = 0, Array A is as follows: 


Array A Value or Description 
A[O] 3 
~- AL1].[46:8] ) 
A(1].[38:6] 1 
A(1].[31:8] Unit type: 
e@ Input devices: 
- 2forSc 
- QforCR 
e Output devices: 
- 7 for LP (train printer) 
— 11 for CP 
— 38 for LP (EBCDIC buffer printer) 
A(2] Unit number 


If VAL = 1 or VAL = 2, use the following input for Array A: 


Array A Value or Description 

A[O] 3 

A[1).[46:8] 0 

A[1].[38:6] 1 

A(1].[31:8] Unit type of input device (refer to Appendix C). 

A(2] Unit number of input device. 

A(3] 3 

continued 

8600 0346-000 12-25 


SETSTATUS Request Type 5 (Unit Requests) 


continued 
Array A Value or Description 
A[4].[46:8] 2 = Modify an association by removing an associated output device. 
1 = Modify an association by adding an output device. 
0 = To create a new association. 
A[4].[38:6] 1 
A[4].[31:8] Unit type of the output device (refer to Appendix C). 
A[5] Unit number of the output device. 
A[6] 0 
Call 


RSLT := SETSTATUS (5, 12, VAL, A); 


Results 


Hard error 41 is returned for VAL 1 and 2 calls if A [0] + A [A[0]] is greater than or 
equal to SIZE (A). . 


To modify an association (VAL = 1), the association has to have been previously created. 
Otherwise, a SETSTATUS call with VAL= 1 will cause soft error 93 (“UNIT NOT 
ASSOCIATED”). — 


If a soft error occurs, bit [47:1] of A[1] or A[4] will be turned on and [46:8] of A[1] or 
A[4] will contain the soft error number. Possible error numbers include the following: 


Soft Error Number Message 
31 INVALID UNIT NUMBER 
41 INVALID UNIT TYPE 
93 NO PREVIOUS ASSOCIATION WAS MADE 
137 UNIT NOT AVAILABLE 
Examples 


For the system command PA ~ SC 13, use the following input: 


A[@] := 3; 

A[1] := @ & 2 [31:8] & 1 [38:6] & @ [46:8]; 
A[2] := 13; 

RSLT := SETSTATUS (5, 12, @, A); 
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For the system command PA SC 12 = + LP 67, use the following input: 


A[@] := 3; 

A[1] := @ & 2 [31:8] & 1 [38:6] & @ [46:8]; 
A[2] := 12; 

A[3] := 3; 

A[4] := @ & 38 [31:8] & 1 [38:6] & 1 [46:8]; 
A[5] := 67; 

A[6] := 8; 

RSLT := SETSTATUS (5, 12, 2, A); 
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PG and PGL Calls 


Use the PG call to purge tape, disk pack, or host control units. Use the PGL call to lock 
the tape units after they have been purged (the unit type must be MT). PG is not valid 
for use with online mirrored packs. You must release the mirrored pack before the PG 
call can be issued. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 5 

SUBTYPE 2 

VAL [0:1] = 1 if lock (PGL) 
[1:1] =0 


[15:8] = Density code: 
e O = Not specified (Density will not be changed.) 
e = 800 bits per inch 
e 2 = 556 bits per inch 
e 3 = 200 bits per inch 
e 4= 1600 bits per inch 
e 5 = 6250 bits per inch 
ARRAYROW A[O] = Length of request 
A[1] through A[A[0}-1) = Unit list 


Each entry in the unit number list that requires from two to six words is as follows: 


Array A Message 
A[n].[31:08] Unit type: 
e 13: MT 
e 17: PK 
e 20: HC 
A({n).[38:06] Number of additional words; must be 1 for MT or HC 
A[n+1] Unit number 
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For a PG PK request, the next few words of each entry in the unit number list are used 
to designate the OLDNAME. The first three bytes in the n+ 2 word must be specified for 
PG PK requests even if there is no OLDNAME (see the example). 


Array A Message 

A[n+2].[47:08] Byte length from this byte to the end of entry 

A{n+2).[39:08] 0 

A(n+2).[31:08] Number of specifications (0 or 1) 

A(n+2).[23:08] Byte length from the next byte to the end of 
the entry 

A(n+2].[15:08] 11 (OLDNAME code) 

A[n+2].[07:08] Beginning of the family name 

A(n+3] through end of entry Continuation of the family name 

Call 


RSLT := SETSTATUS (5, 2, VAL, A); 


Results 


SETSTATUS might return one of the following soft errors for PG and PGL: 


Soft Error Number Message 

14 THE REQUESTED UNIT IS LOCKED 

41 INVALID UNIT TYPE 

92 THE REQUIRED MCP LOCK IS IN USE 

167 REQUEST IS NOT VALID FOR EIO 

193 MIRRORED PACKS MUST BE RELEASED FIRST 
Examples 


For the system command PG MT 30, use the following input: 


A[@] := 3; 
A[1] := @ & 13 [31:98] %% MT unit type 

& 1 [38:86]; %% an additional word 
A[2] := 30; %% unit number 


RSLT := SETSTATUS(5,2,8,A) ; 
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For the system command PGL MT 160 (1600), use the following input: 


A[@] := 3; 
A[1] := @ & 13 [31:98] %% MT unit type 
& 1 [38:96]; %% an additional word 

A[2] := 169; %% unit number 

RSLT := SETSTATUS (5, 2, 
1 & %% PGL 
VALUE (BPI169@) + 1 [15:8], %% 1689 BPI 
A); 


For the system command PG PK 55, use the following input: 


A[@] := 4; %% total words 
A[1] := @ & 17 [31:88] %% PK unit type 
& 2 [38:86]; %% 2 additional words 

A[2] := 55; %% unit number 
REPLACE POINTER (A[3], 8) BY 

48"93" %% total length 

48"99" %% DB 

48"20"; %% @ (no specs) 


RSLT := SETSTATUS (5, 2, 9, A); 


For the system command PG PK 45 OLDNAME = USERPACK, use the following 


input: 


A[®] := 63 
A[1] := 2 


%% total words 
& 17 [31:98] %% PK unit type 
& 4a[ %85 
A[2] := 45; %% 
REPLACE POINTER (A[3], 8) BY 


38:6] ; 4 additional words 
unit number 


48" 8D" %% total length 
48"gg" %, BF 

48"91" %% one spec 
48"g9" %% length of spec 
48" 9B" %% OLDNAME 
8"USERPACK" ; %% value 


RSLT := SETSTATUS (5, 2, @, A); 
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POWER Call 


Use this call to power disk packs either up or down. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 5 

SUBTYPE 6 

VAL 0 = For POWER OFF or POWER DOWN 


6 = For POWER UP 
7 = For POWER UP: OVERRIDE 
ARRAYROW A[O] = Length of request 
A{1] through A[(A[0}-1)] = Request list in the following format: 
e A(n).[38:6] = 1 
@ = A{n).[31:8] = 17 


e A(n+1] = Unit number 
Call 


RSLT := SETSTATUS (5, 6, VAL, A); 


Results 


SETSTATUS can return the following soft errors that refer to units: 


Soft Error Number Message 
24 | UNIT IN USE 
165 UNIT/PATCH NOT POWERUP CAPABLE 


SETSTATUS can return the following soft errors that refer to the system: 


Soft Error Number Message 
11 ADDITIONAL INFO REQUIRED 
186 SCP REPLIED: REQUEST NOT DONE 
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Example 


For the system command POWER DOWN PK44, use the following input: 


~ A{@] := 3; 
A{1] := @ & 17 [31:8] 
& 1 [38:6]; 
A[2] := 44; 
RSLT := SETSTATUS (1, 6, 9, A); 


For the system command POWER UP PK44, use the following format: 


A[@] := 3; 
A[1] := @ & 17 [31:8] 
& 1 [38:6]; 
A[2] := 44; 
RSLT := SETSTATUS (1, 6, 6, A); 
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Use this call to purge all files and to create a new set of volume labels on a disk pack. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 
ARRAYROW 


Value or Description 

5 

6 

1 

A(O] = Total length of input in words 


A(1).[38:06] = Length of the following entry in words, that is, 
A[Q] -2 


A[1).[31:08] = Unit type (refer to Appendix C) 
A[2] = Unit number 
A{3] through end = A list of attributes 


The following characters relate to the data that starts in A [3]: 


Character 

1 

2 

3 

4 through end 


Description or Value 

Length of attribute list in binary characters (including this character) 
0 

Number of attributes 


Attribute assignments 


The following is the format of attribute assignments: 


Character 


1 


3 forward 
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Description or Value 


Length of attribute assignment in characters (not including the 
length character) 


Attribute number: 

e NAME =1 

e INTERCHANGE = 2 

e SERIAL = 3 (The serial number should be six EBCDIC digits.) 
e BP=4 


@ OWNER = 7 
e@ FAMILYINDEX = 9 
e KEEP = 10 


e@ OLDNAME = 11 
Attribute value in EBCDIC characters 
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— Call 


RSLT := SETSTATUS (5, 6, 1, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

41 INVALID UNIT TYPE 

167 INVALID FOR EXTERNAL IO UNITS 
Example 


For the system command RC PK 48, use the following input: 


A[@] := 4; 
A[1] := @& 2 [38:86] 
& 17 [31:86]; 
A[2] := 48; 
REPLACE POINTER (A[3]) BY 
48" 032200" ; 


RSLT := SETSTATUS (5, 6, 1, A); 
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Use this call to initiate a pack volume replacement operation. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 
ARRAYROW 


Call 


Value or Description 

5 

22 

0 

ALO] = 5 

A(1).[38:06] = 1 

A{1).[31:08] = Source unit type (refer to Appendix C) 


A[2] = Source unit number 


_ A[3].[38:06] = 1 


A(3].[31:08] = Destination unit type (refer to Appendix C) 
A[4] = Destination unit number 

A[5) = 0 for REPLACE 

A{5] = 1 for REPLACE and COMPARE 


RSLT := SETSTATUS (5, 22, @ A); 


Results 


SETSTATUS checks to verify that the unit type and unit number designated are 
correct. If the parameters are correct, a waiting entry will appear in the mix. 
SETSTATUS can return the following soft errors for this call: 


Soft Error Number 
31 


41 
167 
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Message 


INVALID UNIT NUMBER (This message is returned if the parameter 
type is neither INTERVAL nor lOINTERRUPT, or if a negative 
counterinterval is designated.) 


INVALID UNIT TYPE 
INVALID FOR EXTERNAL IO UNITS 
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Example 
For the system command REPLACE PK 46 ONTO PK 47, use the following input: 


A[@] := 5 


A[1] := © & 1 [38:06] & 17 [31:98]; 

A[2] := 46; 

A[3] := @ & 1 [38:06] & 17 [31:28]; 

A[4] := 47; 

A[5] := @; % Replace only — 
RSLT := SETSTATUS (5, 22, 9, A); 
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RESTRICT DK, MT, or PK Call 


Use this call to turn on or off security-related restrictions for disks, packs, or tape units. 


If security administrator status is authorized on the system, this call can be invoked only 
by a security administrator usercode. If security administrator status is not authorized, 
this call can be invoked by any privileged user. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 


ARRAYROW 


Call 


Value or Description 

5 

33 

O = Unrestrict access to disk, pack, or tape unit. 
1 = Restrict access to disk, pack, or tape unit. 
A[O] = Two times the number of entries, plus 1. 
A[1] through A[(A[O]-1)] = Request list in the following format: 
e j=1,2,3,.. (A(l0}-1)/2 

e Al2*i-1].{38:6] = 1 

e A(2*i-1].[31:8] = 1 For DK unit type 

e = A(2*i-1).[31:8] = 13 For MT unit type 

e A(2*i-1).[31:8] = 17 For PK unit type 

e@ A{2*i] = Unit number 


RSLT := SETSTATUS (5, 33, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number 
9 

10 

28 


31 
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Message 
REQUEST DENIED 
INVALID NUMBER 


UNIT CORRESPONDENCE (The hardware type code supplied in A 
[1].[31:8] does not match the hardware type code of the unit 
specified.) 


INVALID UNIT NUMBER (The unit number supplied in A [2] is out 
of range, or the unit type code supplied in A [1].[31:8] is missing or 
or invalid or does not match the code stored in the MCP unit table. 
Soft error 31 is also produced if other numbers in the array 
parameter fields are invalid.) 


continued 
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continued 
Soft Error Number Message 
137 UNIT NOT ONLINE TO GROUP 
167 INVALID FOR EXTERNAL IO UNITS 
Example 


For the system command RESTRICT MT 14, 15, PK 63, use the following input: 


A[@] := 73 

A[1] := @ & 1 [38:6] & 13 [31:8]; 
A[2] := 14; 

A[3] := @ & 1 [38:6] & 13 [31:8]; 
A[4] := 15; 

A[5] := @ & 1 [38:6] & 17 [31:8]; 
A[6] := 63; 

RSLT := SETSTATUS (5, 33, 1, A); 
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Use this call to turn on or off security-related restrictions for the ODT. 


If security administrator status is authorized on the system, this call can be invoked only 
by a security administrator usercode. If security administrator status is not authorized, 
this call can be invoked by any privileged user. 


Input 


Use the following input for this call: 


Parameter 


TYPE 
SUBTYPE 
VAL 


ARRAYROW 


Call 


Value or Description 

5 

33 

O = Unrestrict access to ODT. 

1 = Restrict access to ODT. 

A[O] = 6 

A[1}.{38:6] = 1 plus the length of the security key in words. 
A{1].[31:8] = Unit type code (refer to Appendix C). 

A[2] = Unit number. 


A{3] = A maximum of three words, where A[3].[47:8] equals the 
length of the security key and the remainder contains the security 
key itself. The security key can be 1 to 17 alphanumeric characters. 


RSLT := SETSTATUS (5, 33, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number 
9 

10 

28 


31 
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Message 
REQUEST DENIED 
INVALID NUMBER 


UNIT CORRESPONDENCE (The hardware type code supplied in A 
[1].[31:8] does not match the hardware type code of the unit 
specified.) 


INVALID UNIT NUMBER (The unit number supplied in A [2] is out 
of range, or the unit type code supplied in A [1].{31:8] is missing or 
or invalid or does not match the code stored in the MCP unit table. 
Soft error 31 is also produced if other numbers in the array 
parameter fields are invalid.) 


continued 
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SETSTATUS Request Type 5 (Unit Requests) 


continued 


Soft Error Number Message 

137 UNIT NOT ONLINE TO GROUP 

167 INVALID FOR EXTERNAL IO UNITS 
Example 


For the system command RESTRICT SC 14 (SECURITYWORD), use the following 


input: 
A[@] := 63 
A[1] := @ & 4 [38:6] & 2 [31:8]; 
A[2] := 14; 


REPLACE POINTER (A[3], 8) BY 48"9C","SECURITYWORD"; 
RSLT := SETSTATUS (5, 33, 1, A); 
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Use this call to rewind, unload, and lock magnetic tape units. 


Input 


Use the following input for this call: 


Parameter 
TYPE 
_ SUBTYPE 
VAL 
ARRAYROW 


Call 


Value or Description 

5 

0 

0 

A(0] = 3 

A(1].[38:06] = 1 | 
A(1].[31:08] = 13 % Unit type MT 
A[2] = The unit number 


RSLT := SETSTATUS (5, 8, 8, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number 
28 


31 


4l 
137 
167 


Example 


Message 


UNIT CORRESPONDENCE (The hardware type code supplied in A 
[1}.[31:8] does not match the hardware type code of the unit 
specified.) 


INVALID UNIT NUMBER (The unit number supplied in A [2] is out 
of range, or the unit type code supplied in A [1].[31:8] is missing or 
or invalid or does not match the code stored in the MCP unit table. 
Soft error 31 is also produced if other numbers in the array 
parameter fields are invalid.) 


INVALID UNIT TYPE 
UNIT NOT ONLINE TO GROUP 
INVALID FOR EXTERNAL IO UNITS 


For the system command RW MT 49, use the following input: 


A[@] := 3; 
A[1] := 8 & 
A[2] := 49; 
RSLT := SET 
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1 [38:06] & 13 [31:98]; 


STATUS (5, 8, @, A); 
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RY Call 


Use this call to ready peripheral units, central processors, MSMs, and storage interface 
modules (SIMs—A 12, A 15, and A 17). This call can contain more than one request. 
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Input 


Use the following input for this call: 


Parameter 
TYPE 
SUBTYPE 
VAL 
ARRAYROW 


Value or Description 

5 

1 

1 

A[O] = Length of request 


A{1]} to end = Unit number list. Each unit in the list needs a pair of 
words: 


e = The first word of the pair is formatted as follows: 
O & 1 [38:06] & unit type code [31:08] 
(See Appendix C for a list of unit type codes.) 


e The second word of the pair is the external unit or identifying 
number of the unit, processor, or module. 


Use the following fields to ready a SIM: 


| Array A 
A [1].[38:06] 
A[(1).[31:08] 


A(2}.(11:04] 
A [2].[07:08] 


Value or Description 
J 

84 

(SIM unit type code.) 
Number of SIM. 

Bit mask of MSUs. 


Use the following fields to ready an MSM: 


Array A 
A[1J.[38:06] 
A[1].[31:08] 


A [2].[23:16] 
A [2}.[07:08}] 
A [3].[03:04] 


Value or Description 
2 

80 

(MSM unit type code.) 
Bit mask of pages. 
Number of MSM. 

Bit Mask of MSUs. 
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Call 


RSLT := SETSTATUS (5, 1, 1, A); 


Results 


If the SIM or MSM variations are used on a system that does not support the request, 
the soft error 5 (“IT CANT BE DONE”) is returned. Other possible soft errors are the 


following: 
Soft Error Number Message 
4 PREVIOUSLY DONE 
9 REQUEST DENIED 
10 INVALID NUMBER 
11 . ADDITIONAL INFO NEEDED 
28 UNIT CORRESPONDENCE 
42 INVALID MAIN FRAME TYPE 
82 INVALID STANDARD FORM 
97 MODULE ALREADY IN USE 
112 UNIT(S) TO BE READIED 
167 INVALID FOR EXTERNAL IO UNITS 
169 BAD EIO RESPONSE 
172 UNIT HUNG 

Examples 


The following examples show RY requests equivalent to the following system commands: 


RY MT 49 
RY SIM 3 MSUS 6-7 
RY MSM 1 MSUS 8-1 


For the RY MT 49 system command, use the following: 


A[@] : 
A[1] : 
A{2] : 
RSLT : 


33 

8&1 [38:86] & 13 [31:88]; 
49; 

SETSTATUS (5, 1, 1, A); 


For the RY SIM 3 MSUS 0-7 system command, use the following: 


A[@] := 3; 

A[1] := 9 & 1 [38:06] & 84 [31:08]; 
A[2] := @ & 3 [11:64] & 4"FF" [07:08]; 
RSLT := SETSTATUS (5, 1, 1, A); 


For the RY MSM 1 MSUS 0-1 system command, use the following: 
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A[@] := 4; 

A[1] := © & 2 [38:06] & 80 [31:98]; 

A[2] := @ & 4 "FFFF" [23:16] & 1 [07:08]; 
A[3] := @ & 3 [31:32]; 

RSLT := SETSTATUS (5, 1, 1, A); 
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SCAN Call 


Use this call to read a pack or disk volume and to analyze and record and read errors. 
It lets you determine, in advance, the results of issuing a REPLACE command that 
designates the given device as a source. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 5 

SUBTYPE 23 

VAL 0 

ARRAY ROW A[O] = 3 


A(1).[38:06] = 1 
A{1}.[31:08] = Unit type 
(Refer to Appendix C for a list of unit type codes.) 
A(2] = Unit number 
Call 
RSLT := SETSTATUS (5, 23, @, A); 
Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

41 INVALID UNIT TYPE 

167 INVALID FOR EXTERNAL IO UNITS 
Example 


For the system command SCAN PK 46, use the following input: 


A[@] := 3; 

A[1] := @ & 1 [38:96] & 17 [31:88]; 
A[2] := 46; 

RSLT := SETSTATUS (5, 23, 9, A); 
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SEND Call 


Use this call to send a message that communicates with the image printer (IP) support 
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library, host support library, or the network processor support library. 


Input 


Use the following input for this call: 


Parameter Value or Description 
TYPE 5 

SUBTYPE 24 

VAL 0 

ARRAY ROW A[O] = 3 


A[1].[38:06] = 0 & 1 [38:06] & unit type [31:08] 
(Refer to Appendix C for a list of unit type codes.) 
A[2] = Unit number 

A[3] = Count of characters in message 


A(4] through end = Message text 


Call 


RSLT := SETSTATUS (5, 24, 8, A); 


Results’ 


The program sending the message receives no response. 


SETSTATUS can return the following messages for this call: 


Soft Error Number Message 

15 UNIT NOT READY 

4] INVALID UNIT TYPE 
Example 


For the system command SEND NP 231 LOAD, use the following input: 


A[@] := 3; 


A[1] := @ & 1 [38:96] & 27 [31:98]; 
A[2] := 231; 

A[3] := 4; 

A[4] := "LOAD "; 


RSLT := SETSTATUS (5, 24, @, A); 


8600 0346-000 


SN and SNL Calls 
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Use these calls to purge and to assign serial numbers to tape volumes and to designate 


their recording density. 


Input 


Use the following input for this call: 


Parameter 
‘TYPE 
SUBTYPE 
VAL 


ARRAYROW 


Call 


Value or Description 


5 

Z 

[0:1] = 1 If lock (SNL) 
{1:1} =1 


{15:8] = Density code: 

e 0 = Not specified (Density will not be changed.) 
e 1 = 800 bits per inch 

e 2 = 556 bits per inch 

e 3 = 200 bits per inch 

e 4= 1600 bits per inch 

e 5 = 6250 bits per inch 

A{0] = Length of request 

A[1] = 0 & 2 [38:06] & unit type [31:08] 

(Refer to Appendix C for a list of unit type codes.) 
A[2] = Unit number 

A[3] = Serial number as 6 EBCDIC characters 


RSLT := SETSTATUS (5, 2, VAL, A); 


Results 


SETSTATUS does not return any unique errors for this call. The SN call shares most of 
the errors that any Request Type 5 call can return. 


Example 


For the system command SN MT 49 UNISYS (1600), use the following input: 
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A[@] := 4; 

A[1] := @ & 2 [38:06] & 13 [31:98] & 4 [15:98]; 

A[2] := 49; 

A[3] := REPLACE POINTER (A[5]) BY 8"UNISYS"; 

RSLT := SETSTATUS (5, 2, 2 & (VALUE (BPI16@2)+1), A); 


12-48 8600 0346-000 


SETSTATUS Request Type 5 (Unit Requests) 


SR Call 


Use this call to cause the system to reject all card decks entered in a card reader if those 
decks do not contain a USER statement. 


Input 


Use the following input for this call: 


Parameter _ Value or Description 
TYPE 5 
SUBTYPE 5 
VAL —  O=SR 
1=SR 
ARRAYROW A{O] = Length of request 


A{1] = 0 & 1 [38:06] & unit type [31:08] 
(Refer to Appendix C for a list of unit type codes.) 
A(2] = Unit number 

Call 


RSLT := SETSTATUS (5, 5, VAL, A); 


Results 


The SR call shares most of the errors that any Request Type 5 call can return. In 
addition, it also returns the following unique calls: 


Soft Error Number Message 
4 PREVIOUSLY DONE (if the unit is already secured by an SR call or 
is already unsecured by an SR- call.) 
41 INVALID UNIT TYPE (If the unit address is not a card reader.) 
Example 


For the system command SR CR 10, use the following input: 


A[{@] := 3; 

A(1] := 9 & 1 [38:06] & 9 [31:08]; 
A[2] := 183 

RSLT := SETSTATUS (5, 5, 1, A); 
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SV Call 


Use this call to save peripheral units, central processors, MSMs and SIMs (A 12, A 15, 
and A17). This call can contain more than one request. 


Input 


Use the following input for this call: 


Parameter - Value or Description 
TYPE 5 

SUBTYPE 1 

VAL 0 

ARRAYROW A[O] = Length of request 


A{1] to end = Unit number list. Each unit in the list needs a pair of 
words: 


e The first word of a pair is formatted as follows: 
0 & 1 [38:06] & unit type code [31:08] 
(Refer to Appendix C for a list of unit type codes.) 


e@ The second word of a pair is the external unit or identifying 
number of the unit, processor, or module. 


Use the following to save a SIM: 


Array A Value or Description 
A [1].[38:06] 1 . 
A [1].[31:08] 84 

(SIM unit type code) 
A [2].[11:04] Number of SIM 
A [2].[07:08] Bit mask of MSUs 


Use the following to save an MSU: 


Array A Value or Description 
A [1).[38:06] 2 
A [1].[31:08] 80 

(MSU unit type code) 
A [2].[23:16] | Bit mask of pages 
A [2].[07:08] Number of MSM 
A [3].[03:04} Bit mask of MSUs 
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Call 


RSLT := SETSTATUS (5, 1, @, A); 


Results 


If the SIM or MSM variations are used on a system that does not support the request, 
the soft error 5 (“IT CANT BE DONE”) is returned. Other possible soft errors are the 


following: 

Soft Error Number Message 

4 PREVIOUSLY DONE 

9 REQUEST DENIED 

39 ONLY ONE PROCESSOR 

42 INVALID MAIN FRAME TYPE 
~ 169 BAD EiO RESPONSE 

172 UNIT IS HUNG 
Example 


For the system command SV MT 49, use the following input: 


A[@] := 3; 

A[1] := 9 & 1 [38:96] & 13 [31:08]; 

A[2] := 49; % SV MT 49 
RSLT := SETSTATUS (5, 1, @, A); 
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TERM Call 


This SETSTATUS call corresponds to the DCSTATION FALSE and DCSTATION 
TRUE options of the TERM system command, except that you must designate the unit 
number of the target ODT in the call. 


Input 


Use the following input for this call: 


Parameter Value or Description 

TYPE 5 

SUBTYPE — 29 

VAL O = For TERM DCSTATION FALSE 
1 = For TERM DCSTATION TRUE 

ARRAYROW A[O] = 3 


A{1] = 0 & 1 [38:06] & 2 [31:08] 
A[2] = Unit number of the ODT 


Call 


RSLT := SETSTATUS (5, 29, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

28 UNIT CORRESPONDENCE (The hardware type code supplied in A 
(1}.[31:8] does not match the hardware type code of the unit 
specified.) 

31 INVALID UNIT NUMBER (The unit number supplied in A [2] is out 


of range, or the unit type code supplied in A [1].[31:8] is missing or 
invalid or does not match the code stored in the MCP unit table. 
Soft error 31 is also produced if other numbers in the array 
parameter fields are invalid.) 


41 INVALID UNIT TYPE 
137 UNIT NOT ONLINE TO GROUP 
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Example 


The following example shows the SETSTATUS cail that is equivalent to the system 
command TERM DCSTATION TRUE. The target ODT has the unit number 129. 


33 

® & 1 [38:06] & 2 [31:98]; 
129; 

SETSTATUS (5,29,1,A); 


A[@] : 
A[1] : 
A[2] : 
RSLT : 
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UR Call 


Use this call to reserve a unit so that maintenance can be performed or to make a 
previously reserved unit available for normal use. You cannot use this call for online 
mirrored packs. 


Input 


Use the following input for this call: — 


Parameter Value or Description 
TYPE 5 
SUBTYPE 4 for a unit. 
20 for a path. 
VAL 0 = UR- 
= UR 
ARRAYROW AO] = Number of words in entry. 


AL1].[46:08] = If designated, is the unit path to be reserved. In this 
case, the SUBTYPE parameter should be 20. 


A[1}.[38:06] = 1 

A[1].[38:06] = O for UR. 

A(1}.[32:01] = 1 for UR with MAINT mode selected. 
A(1].[31:08] = Unit type. 

(Refer to Appendix C for a list of unit type codes.) 
A(2] = Unit number. 


Call 


RSLT := SETSTATUS (5, S, VAL, A); 


Results 


SETSTATUS can return the following soft errors for this call: 


Soft Error Number Message 

29 UNIT WAS NOT RESERVED (for UR-) 

62 CANNOT RESERVE HALT/LOAD DISK 

150 DISK MUST BE CLOSED TO UR IT 
189 CANNOT RESERVE A MIRRORED DISK 
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Examples 
For the system command UR MT 30, use the following input: 


A[@] := 3; 


A[1] := @ & 13 [31:88] & 1 [38:06]; 
A[2] := 30; 
Ve 3e-13 


RSLT := SETSTATUS (5, 4, V, A); 
For the system command UR- LP 5, use the following input: 


A[@] := 3 


A[1] := 8&7 [31:08] & 1 [38:06]; 
A[2] := 53 
V 3:= @; 


RSLT := SETSTATUS (5, 4, V, A); 
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Hard Errors 


Table A-1 lists the hard errors returned for SETSTATUS and GETSTATUS. In some 
cases the same error number ¢an indicate different errors, depending on context. In 
these cases, all of the errors associated with the number are listed. 


If bit [0:01] of the Boolean result from GETSTATUS or SETSTATUS is turned on and 
bits [11:08] of the result are not all 0, a hard error has occurred. A numerical error code 
for the error will appear in bits [11:08] of the Boolean result. 


Table A-1. Hard Errors 


Number Explanation 


The numbers or format of parameters in the array ARY is incorrect. 
35 ARY(0].[19:20] is less than 2. 
ARY[0].[19:20] is greater than or equal to the length of the ARY array. 


Invalid value in TYPE.TYPEF. 


For a GETSTATUS call, the SUBTYPE value in the TYPE.[15:08] 
parameter is invalid. For SETSTATUS calls, the SUBTYPE parameter is 
invalid. 


This call is valid only on cataloging systems. 


For a GETSTATUS call, SIZE (ARY) is greater than 21845 words or 
ARY([0].[19:20] is greater than 2047. For a SETSTATUS PA call 
(Request Type 5 SUBTYPE 12), adding the new information to the PA list 
would make the list more than 300 words long. 


4] For a GETSTATUS call, complete information for first request could not 
be provided (insufficient space in array; A[O].[19:20] is too small). For a 
SETSTATUS call, the index to a name or string points beyond the end of 
the array ARY. 


For a GETSTATUS call, ARY[0].[39:20] is greater than or equal to 
ARY[0].[19:20]. For SETSTATUS volume directory calls, the volume 
directory record provided is too large, the list of serial numbers is too 
long or too short, or the tape name provided is too long. For other 
SETSTATUS cails, the length of a string or name is designated as less 
than 0, or it extends beyond the end of the array ARY. 


Invalid user of GETSTATUS intrinsic. For a SETSTATUS call, a standard 
form name passed in the array ARY is less than 5 bytes long. 


continued 
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Table A-1. Hard Errors (cont.) 


Number Explanation 


For a GETSTATUS call, SUBCLASS.ORGLEVELF is greater than the 
length of the first name found in the directory. For a SETSTATUS call, a 
standard form name passed in the array ARY is not correctly formatted. 


SETSTATUS/GETSTATUS fauit (and memory dump) occurred. : 


Last name of simple name request list has a standard form name format 
error, or there is not enough room in the array to return the fixed 
information for the file. 


ARY[0].[19:20] is not large enough. 


Insufficient space in array to insert <on part> identifier. 


Not used. 


TYPE DISPLAYFORMNAMEF is turned on, but 
TYPE.RETURNFULLNAMEF is not turned on. 


Not used. 
Not used. 


For GETSTATUS call Request Type 0 SUBTYPE 5, both the MASK 
parameter and ARY [0].[39:20] are 0. 


A[1] is less than O or A[1] is greater than or equal to the size of the MCP 
warning list (in words). 


For a GETSTATUS call, the value of the SUBCLASS parameter is invalid. 


The size of the array parameter is too small to contain all the information 
required for the call. Or the length of a structure or record in the array 
parameter extends beyond the end of the array parameter. 


Word 0 of the array parameter does not have a valid value for the given 
call. 


An error occurred while SETSTATUS was executing an archive directory 
request. The family might be offline, there might be no archive record for 
the requested file name, or the archive record might be incorrectly 
formatted. 


Did not compile the MCP with $STATISTICS = TRUE. 


The array in the MCP that contains the list of warnings to suppress 
cannot be expanded because it would become too large. 


Error in processing a volume directory request. 


Volume directory not active (SECOPT TAPECHECK value is NONE). 
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Soft Errors 


Table B—1 lists the soft errors returned for SETSTATUS and GETSTATUS. In some 
cases the same error number can indicate different errors, depending on context. In 
these cases, all of the errors associated with the number are listed. 


If bit [0:01] of the Boolean result from GETSTATUS or SETSTATUS is turned on 

and the field [11:08] is also 0, a soft error has occurred. When a soft error occurs, 
GETSTATUS or SETSTATUS stores one or more soft error words in the array ARY. A 
soft error word has bit [47:01] turned on, and the numerical soft error code appears in 
bits [46:08] of the word. 


Table B—-1. Soft Errors 


Number Message 


INVALID ERROR (The requested SETSTATUS action will be done.) 
IMPROPER STACK STATE 
INVALID REPLY 

NO REPLY NEEDED 
PREVIOUSLY DONE 

IT CANT BE DONE 

Not used. 

Not used. 

INVALID FILE TYPE 
REQUEST DENIED 
INVALID NUMBER 


ADDITIONAL INFO REQUIRED (The word count in field [38:06] of a 
word in the array parameter A is either 0 or is too small.) 


IS A CODE FILE 

HUB TITLE CONFLICT 
UNIT LOCKED 

UNIT NOT READY 
WRITE PARITY 
WRITE ERROR 


0 
1 
2 
3 
4 
5 
6 
7 
8 
9 
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Table B-1. Soft Errors (cont.) 


Number Message 


NOT A CODE FILE 
REWIND ERROR 
TEST FUNCTION 
NO IO PATH 


CODE ERROR (A mistake in the MCP code caused an unknown error 
indication in GETSTATUS or SETSTATUS.) 


UNIT IN USE 

UNIT RESERVED 

UNIT SAVED 

UNIT IN REWIND 

UNIT CORRESPONDENCE 
IS NOT RESERVED 

INVALID UNIT NUMBER 
INVALID SUB CLASS 

MOD BEING SAVED 
MODULE IN USE 

CANNOT SAVE STACK VECTOR MOD 
MODULE NOT ON LINE 
ONLY ONE PROCESSOR 
CANNOT SV TOP MOD 
INVALID UNIT TYPE 
INVALID MAIN FRAME TYPE 
DISK READ ERROR 

INVALID FACTOR TYPE 
NAME REQUIRED 


(This soft error number is reserved.) 


(This soft error number is reserved.) 
(This soft error number is reserved.) 
NO FILE 

(This soft error number is reserved.) 
INVALID PACK NAME 


continued 
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Table B—1. Soft Errors (cont.) 


UNIT NOT AVAILABLE 
(This soft error number is reserved.) 


(This soft error number is reserved.) 
FAMILY NAME REQUIRED 
INVALID SYNTAX 

CANNOT BE SNED 


’NOT ALLOWED (Either the call requested action or information that is 
not valid for this type of machine or the configuration in use, or the 
action or information is not valid for the unit specified in the call.) 


NAME TOO LONG 

INVALID PARAMETER INDEX 
ALREADY RUNNING 

CAN'T RESERVE H/L UNIT 
PARAMETER LENGTH ERROR 


INVALID DAY (Must be in the range of 1 to 28, 29, 30, or 31, depending 
on the month.) 


INVALID YEAR (Must be at least 1900.) 
(This soft error number is reserved.) 
(This soft error number is reserved.) 
(This soft error number is reserved.) 


INVALID VALUE (The third parameter of the call is out of range for the 
given request type.) 


(This soft error number is reserved). 

NO BACKUP ON DK OR PK (SETSTATUS) 

INVALID MONTH (Must be in the range of 1 to 12.) 
UNKNOWN STATION 

DATACOM INACTIVE 

INACTIVE STATION 


THREE ADDLWORDS REQUIRED (The value in the [38:06] field of word 
one of the array parameter is less than three.) 


INCOMPLETE ENTRY (The value in word O of the array parameter is 
wrong, or a value in field [38:06] of a word in the array parameter is 
wrong.) 
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Table B-1. Soft Errors (cont.) 


Number Message . 


INVALID STACK TYPE 
INVISIBLE STACK 
IS A COMPILER 


FIVE CHARS REQ (The first byte of a standard form name is less than 
five.) 


INVALID STANDARD FORM 
MISSING CONTINUATION 


INSUFFICIENT SPACE (There is not enough space in the array 
parameter. A name or string supplied in the array has a length indicating 
that it would extend beyond the size of the array, or the array is not large 
enough to receive all of the requested information.) 


INVALID QUEUE HEAD 

INV MCS 

UNIT(S) TO BE SAVED 

UNIT FAULT ERROR 

MIX FAULT ERROR 

REQUIRED LOCK IN USE, TRY AGAIN LATER 
UNIT NOT ASSOCIATED 

AUDIT IS NOT RUNNING 

Not used. 

MODULE ALREADY IN USE 

NOT TEST JOB 

*PU’ AND ’PU TRANSPARENT’ CANNOT BOTH BE SET 
"SECADMIN’ AND ’SECADMIN TRANSPARENT’ CANNOT BOTH BE SET 
WEL NOT INITIATED 

NOT DSED, LIBRARY NOT RESUMABLE 
(This soft error number is reserved.) 

(This soft error number is reserved.) 

NOT DSED, NETWORK SERVICES LIBRARY 
NOT DSED, HOST SERVICES LIBRARY 

MOD ALREADY ON LINE 

MCM ALREADY ON LINE 


continued 
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Table B—-1. Soft Errors (cont.) 


Number Message 


MCM IN USE 

MCM NOT ON LINE 

(This soft error number is reserved). 
UNIT(S) TO BE READIED 

INVALID ATTRIBUTE LIST 


DYNAMIC MASK LINK ERROR (The vaiue in A [0].{39:20] of the array 
parameter is greater than 1 but [38:06] in one of the list words in the 
array is greater than A [0].[39:20] - 2.) 


NOT ENOUGH AVAILABLE DISK SPACE TO COPY 
COPY ERRORS 

NOT LOCKED 

BAD LINK FIELD 

SIMPLE NAME ERROR 

FAMILY NOT ONLINE 

SFN FORMAT 


NO FILES FOUND UNDER DIRECTORY 


NO VOLUME LIBRARY 
SERIAL NUMBER NOT FOUND 


BAD SECURITY BYTE (The second byte of a standard form name is 
invalid.) 


(This soft error number is reserved.) 

DISPLAY FORMAT (INVALID FILENAME) 

PATH ALREADY RESERVED 

CANT START STATISTICS (SETSTATUS) 
_ STATISTICS ARRAY NOT PRESENT (GETSTATUS) 

NOT A STATISTICS MCP 

NOT WHILE NETWORKING 

HOSTNAME IS REQUIRED 

DUP FAMILY 

PROGRAM IS LOCKED 

UNIT NOT ONLINE TO GROUP 

INVALID TIME 


continued 
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Table B-1. Soft Errors (cont.) 


Number Message 7 


INVALID DAY OF WEEK 

INVALID TIME ZONE 

INVALID OFFSET DIRECTION 

INVALID OFFSET VALUE 

UNIT MUST BE CLOSED 

BAD PROCESSOR ID 

MINIMUM PASSWORD LENGTH ENFORCED, REQUEST DENIED | 

HOST NAME NOT SET 

INVALID FOR EXTERNAL IO UNITS 

MESSAGE ARRAY OVERFLOW | 

INVALID EXTERNALIO RESPONSE 
UNIT MUST BE SAVED 

EXTERNAL IO HANDLER INACTIVE 

UNIT IS HUNG 

REQUIRES A LABELED UNIT 

(This soft error number is reserved.) 

INVALID PATH STATISTICS 

INVALID FAMILY INDEX 

Not used. 

SEGARRAYSTART VALUE TOO SMALL 

SEGARRAYSTART VALUE TOO LARGE 

REQUESTOR INUSE FOR TESTING 

HUB NUMBER TOO LARGE 
DEFAULT HUBMAP FULL 

PROCESSOR ID NOT ALLOWED 

ERROR GETTING HL UNIT FROM SCP 

SCP COULD NOT SET HL UNIT 

SCP REPLIED: REQUEST NOT DONE 

THAT FAMILY IS NOT CM'ED 

UNIT MUST BE A SMD DISK 

CANNOT UR A MIRRORED UNIT (SETSTATUS) 


continued 
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INVALID HY ADAPTER (GETSTATUS) 
CANNOT SV A MIRRORED UNIT (SETSTATUS) 
HY READ STATISTICS ERR (GETSTATUS) 
CANNOT RC A MIRRORED UNIT 

CANNOT LB A MIRRORED UNIT 

CANNOT PG A MIRRORED UNIT 

DISK MIRRORING ALREADY SET 

DISK MIRRORING NOT YET SET 
MIRRORED SET(S) STILL EXIST 

Not on this EMODE level. (NOT ON MCP/AS) 
ERR DURING CONVERSION (SETSTATUS) 
NOT MIRRORED UNIT (GETSTATUS) 
DESTINATION IS A MIRRORED UNIT (SETSTATUS) 
UNABLE PERFORM REQUEST 

ADAPTER DOES NOT EXIST 

ADAPTER IN USE BY BNA 

ADAPTER IN USE BY HY FILE 

DISK CACHE IS NOT RUNNING 

UNIT IS ALREADY CACHEING 

UNIT IS NOT CACHEING 

NO CACHEING UNITS 

ADAPTER MAY NOT BE CLEARED 

ERROR CLEARING ADAPTER 

NETEX TERMINATE IN PROGRESS 

NETEX INITIALIZE IN PROGRESS 

HY READ STATISTICS ERROR 

CODEFILE NOT LIBRARY CAPABLE 
CANNOT CHANGE A SYSTEM LIBRARY 
FUNCTION WAS NOT ESTABLISHED 

CAN'T BE MODIFIED WHILE IN USE 

SUED FILE NOT PUBLIC 


continued 
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Table B—1. Soft Errors (cont.) 


Number Message 


MCP NOT COMPILE WITH MEMTRACE 

VALUE(S) INCOMPATIBLE WITH SECURITY CLASS 
REQUEST DENIED: SECADMIN USERCODE REQUIRED 

XP FAILED: CODE FILE IS NOT A PROGRAM 

XP FAILED: CODE FILE IS A SAFE PROGRAM 

VOLUME DIRECTORY NOT READY YET 

LIBRARY MARK LEVEL IS NOT EQUAL TO MCP MARKLEVEL 
SECOPT TAPECHECK IS NOT AUTOMATIC 

ERROR PROCESSING VOLUME DIRECTORY REQUEST 

FILE NOT RESTRICTED: INCOMPATIBLE HEADER VERSION 


SYSTEM HAS NO INFOGUARD AUTHORIZATION — HALT/LOAD TO 
INSTALL INFOGUARDSUPPORT 


SYSTEM HAS NO INFOGUARD AUTHORIZATION — 
INFOGUARDSUPPORT LIBRARY NOT SL-ED 


VOLUME DIRECTORY NOT ACTIVE 

ARRAY TOO SMALL FOR VOLUME DIRECTORY RECORD 
CANNOT CACHE SHARED DISK 

UNIT IS IN ANOTHER PARTITION 

THE DRC SYSTEM IS NOT ACTIVE 

ATTEMPT TO EXCEED TEMPORARY FILE LIMIT 
ATTEMPT TO EXCEED FAMILY LIMIT 

FAMILY INTEGRAL LIMIT EXCEEDED 
PREDICTIVE CACHE ALREADY RUNNING 
UNIT IS ALREADY PREDICTIVE CACHEING 
UNIT IS NOT PREDICTIVE CACHEING 

NO PREDICTIVE CACHEING UNITS: 


continued 
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Table B-1. Soft Errors (cont.) 


CODEFILE ALREADY ASSOCIATED WITH FUNCTION 
LENGTH FIELD EXCEEDS SIZE OF INPUT ARRAY 


SYSTEM HAS NO INFOGUARD AUTHORIZATION — 
INFOGUARDSUPPORT LIBRARY INITIALIZING 


CODEFILE INCOMPATIBLE WITH THIS MCP VERSION 
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Appendix C 


Hardware Resource Codes and 
Unit Type Codes 


EN 


Table C—-1 shows hardware resource codes and unit type codes (UNITTYPE). Code 
numbers 1 through 63 are I/O unit type codes. The remainder are codes for other kinds 
of hardware objects such as processors, modules, and interfaces. 


Table C-1. Hardware Resource Codes and Unit Type Codes 


Code Number Description 


DK, memory disk 

SC or ODT 

(Internal MCP code for REMOTE units) 
CD, CD-ROM 


— 


Not used (formerly for paper tape punch) 
LP, buffer printer 


LP, train printer 


HY, HYPERchannel adapter 


mo OA NN OD oO F&F W PL 


CR, card reader 

(Internal MCP code value) 
CP, card punch 

Not used 

MT, 7-track tape 

MT, 9-track tape 

MT, phase-encoded (PE) tape 


DC, data comm network support processors (NSPs) and frame 
recognition data link processors (FR DLPs) 


PK, disk pack 
- UD, small computer system interface (SCSI) unit 


PO, (internal MCP code value) 


HC, host control unit — intersystem control (ISC) 


continued 
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Table C-1. Hardware Resource Codes and Unit Type Codes (cont.) 


Code Number Description 


FP, floating-point array processor 
| LP, printer 
IP, image printer used as a line printer 
SPC, special peripheral control 
Not used (formerly for diskette) 
IP, virtual static image device (VSID) DLP, also called ASID 
NP, communications processor local area network DLP 
IP, image printer used as a VSID 
LP, printer 
LP, printer 
MT, magnetic tape 
CPU or CPM, processor 
MOD, memory module 
RMM or IOM, resource management module (A 16 = IOM) 
DTU, data transfer unit 
Domain 
System (A 16 = domain) 
Exchange 
Maintenance 
Path ID 
DLP, data link processor 
MSM, memory storage module 
Base 
HDU, host data unit 
MLI, message level interface 
SIM, storage interface module 


CTL, control 


| Port hardware on a large system 


IOP, I/O processor 
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Example of a GETSTATUS Directory Call 


The $SET INSTALLATION 1 card must appear before the first BEGIN statement in 
any program in which you include this procedure. This card in needed because this 
procedure uses the DISPLAYTOSTANDARD intrinsic. 


$SET INSTALLATION 1 


SAE 
% THIS PROCEDURE IS A SIMPLE BUT COMPLETE EXAMPLE % 
% OF THE GETSTATUS DIRECTORY INTERFACE INCLUDING. % 
% CONTINUATION CALLS AND ATTRIBUTE GATHERING. 
OCC 


REAL PROCEDURE DIRREQUEST (FILETITLE,ALLOC,SEGS,LASREC,CDATE,ADATE, 


Bef 8 Bae oe 


TSTAMP) ; 

ARRAY FILETITLE[9] ; 
% THE ARRAY IS GIVEN THE INITIAL NODE 
% FOR THE DIRECTORY AND RETURNS A FILE 
% TITLE FOR EACH INVOCATION. 


REAL 
LASREC, % THE LASTRECORD IN USE BY THIS FILE. 
ALLOC, % THE SECTOR ALLOCATION FOR THIS FILE. 
SEGS, % THE LAST SECTOR IN USE FOR THIS FILE. 
CDATE, % THE CREATION DATE OF THE FILE. 
ADATE, % THE ACCESS DATE OF THE FILE. 
TSTAMP ; % THE TIMESTAMP WORD OF THE FILE. 


% PRAGMATICS: 


THIS PROCEDURE MAY BE THE BASIS FOR UTILITIES 
WHICH NEED DIRECTORY LISTS AND ATTRIBUTES OR 
PROGRAMS WHICH READ DATA FROM AN ENTIRE NODE 
OF SEPARATE FILES. 


USE: 


d& d& F BD Se LH 


CALL THE PROCEDURE PASSING AN ARRAY AND 5 REALS. 

THE ARRAY SHOULD CONTAIN THE FULLY QUALIFIED NAME 
OF A FILE INCLUDING THE "ON PART" AND TERMINATED 

WITH A PERIOD. THE ARRAY SHOULD BE LARGE ENOUGH 

FOR THE LARGEST FILENAME POSSIBLE AND THIS ARRAY 

MUST NOT BE MODIFIED BETWEEN CALLS. 


d d& de oh o BO 
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% VALUE: i 


% THE PROCEDURE RETURNS THE FILE TITLE WITH "ON" 

% PART AND THE ATTRIBUTES OF THE FILE IN THE 

% REALS. THE PROCEDURE IS SET TO A NONZERO 

% VALUE WHEN COMPLETE. THE VALUE IS LESS THAN @ IF 
THE DIRECTORY IS EXHAUSTED AND MORE THAN @ 

% (THE ERROR VALUE) IF AN ERROR WAS ENCOUNTERED. 


BEGIN 


TANDARD FORM NAME 
ACKNAME FOR ON PART 
RRAY FOR GETSTATUS 


[Is 


OWN ARRAY STDFN[@:45], 
PKNARRY[@:3] ,% 
GSA[@:1999]; % 

EBCDIC ARRAY EGSA[@] = GS 

POINTER S,ST,FTP; 

OWN REAL I; 

REAL J,1X,71,12, 

FKIND,NEEDQUOTES; 

BOOLEAN USERCODE,SYSTEMFILE,B; 

TRUTHSET LEVELCHRS (ALPHA OR "-_"); 

OWN ARRAY FNAMEPOINTERS[1:14]; 

LABEL EXIT,CONTU; 


>>rsenyn 


DEFINE 

SUBTYPEF = [15:8]#, 

TYPEF = [7:8] #, 

MASK = 1 7 ~  %POINTER WORD 

& 1 [7:1] %ROWS IN USE 

& 1 [1:1] - %CREATION DATE 
& 1 [15:1] %ACCESS DATE 
& 1 [11:1] _ %END OF FILE COUNT IN SEGS 
& 1 [21:1] %TIMESTAMP 
& 1 [12:1] % # OF BITS IN LAST SEG 
& 1 [2:1] %DISK BLOCKING 
& 1 [5:1] %ROW SIZE 
& 1 [6:1] %CRUNCH STATUS 
& 1 [22:1] %TOTAL SECTOR ALLOCATION 
& 1 [41:1] %FILELENGTH 
& 1 [18:1] #, %FILE MISC: FRAMESIZE,ETC. 

ERRORF = [47:1] #, 

ADDINFOF = [46:8] #, 

SUBVALUE1IF = [35:3]#, 

SUBVALUE2F = [38:2] #, 

SUBVALUE3F = [36:1]#, 

LINKF = [32:17] #, 

LEVELF = [3:4] #, 

ONPARTLINKF = [43:11] #, 

INFOF = [15:16] #, 

EXTFRAMESZ = GSA[I+18] . [23:8] #, 

BLKSZ = GSA[I+2] . [47:16] #, 

MAXSZ = GSA[I+2] . [15:16] #, 

DEFINEND = #; : 
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FTP: =POINTER(FILETITLE) ; 
IF I=@ THEN 
BEGIN 
ST:=POINTER(STDFN) ; 
IF FTP="=" THEN 
REPLACE ST BY 48"93999008" 
ELSE 
IF (B:=DISPLAYTOSTANDARD(FTP,ST)) THEN 
BEGIN 
DIRREQUEST:=REAL (B) ; 
GO TO EXIT; 
END; 
GSA[G] :=298; - 
GSA[1] :=8; 
REPLACE POINTER(GSA[20@]) BY ST FOR STDFN[@]. [47:8]; 
B:=GETSTATUS(@ & 1 [42:1] & 3 TYPEF & 1 SUBTYPEF,®,MASK,GSA) ; 


CONTU: 
IF B THEN 
BEGIN 
DIRREQUEST :=GSA[1] .ADDINFOF; 
GO TO EXIT; 
END; 
END; 
IF I=@ THEN 
I:=23 
DO 
BEGIN 
IF I GEQ GSA[@] THEN 
BEGIN 
1:=0; 


IF GSA[@].ERRORF=1 THEN 
BEGIN % CONTINUATION 
GSA[O] :=208; 
B:=GETSTATUS(@ & 1 [42:1] & 3 TYPEF & 4 SUBTYPEF, 

®,MASK,GSA) ; 
GO TO CONTU; 
END 

ELSE 
DIRREQUEST:=-1; 

GO TO EXIT; 

END; 
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IX:=I]; 
IF GSA[I].LEVELF=@ THEN 

I:=GSA[I] . LINKF+1; 

IF GSA[I].LEVELF=1 THEN % FIRST ENTRY 

BEGIN 

REPLACE POINTER(PKNARRY) BY " ON ", 

EGSA[(J:=GSA[GSA[1] .ONPARTLINKF] . LINKF) +1] 
FOR REAL(EGSA[J],1), "."3 
IF GSA[I] .SUBVALUE1F=3 THEN 
USERCODE:=TRUE 
ELSE 
IF GSA[I].SUBVALUE1F=2 THEN . 
SYSTEMFILE:=TRUE; 

END; 
S:=FTP+(FNAMEPOINTERS [GSA[I] . LEVELF]) ; 
SCAN EGSA[(J:=GSA[I] .LINKF)+1] FOR NEEDQUOTES:REAL(EGSA[J] ,1) 

WHILE IN LEVELCHRS; 

IF USERCODE THEN 

REPLACE S:S BY "(" 
ELSE 
IF SYSTEMFILE THEN 

REPLACE S:S BY "*"; 

IF FNAMEPOINTERS[GSA[I].LEVELF] GEQ 1 THEN 

IF S-1 NEQ ")" THEN 

REPLACE S-1 BY "/"; 
IF NEEDQUOTES ISNT @ THEN 

REPLACE S:S BY """s 
REPLACE S:S BY EGSA[J+1] FOR J:=REAL(EGSA[J] ,1)3 
IF NEEDQUOTES ISNT @ THEN 

REPLACE S:S BY """; 

IF USERCODE THEN 
REPLACE S:S BY ")" 
ELSE 

REPLACE S:S BY "/"; 

IF USERCODE OR SYSTEMFILE THEN 

Js=*+2 

_ ELSE 

J:=*+15 
IF NEEDQUOTES ISNT @ THEN 

Js=*+23 
FNAMEPOINTERS [GSA[I] .LEVELF+1] :=FNAMEPOINTERS[GSA[T] . LEVELF] +J; 
USERCODE: =SYSTEMFILE:=FALSE; 

FKIND:=GSA[I] .SUBVALUE2F; 
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IF I 


I 


EXIT: 
END; 
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X NEQ I THEN 


BEGIN 
SEGS: 


=GSA[I+11]+(IF GSA[I+12] > @ THEN 1 ELSE 8); 


ADATE:=GSA[I+15] ; 
CDATE:=GSA[I+1]; 
TSTAMP:=GSA[I+21] ; 
IF BLKSZ = @ THEN 


ELSE 


LASREC:=(GSA[I+41]+MAXSZ-1) DIV MAXSZ-1 


BEGIN 
% CHARACTERS PER SECTOR 
T1:=(48 DIV EXTFRAMESZ) *39; 
% SECTORS PER BLOCK 
T1:=(BLKSZ+T1-1) DIV T1; 
% CALCULATE LASTRECORD 
T2:=GSA[I+11] MOD T1 
* (48 DIV EXTFRAMESZ) *38 
+ (GSA[I+12] + (EXTFRAMESZ - 1)) 
DIV (48 DIV (48 DIV EXTFRAMESZ)); 
T2:=MIN(T2,BLKSZ) 
+ GSA[I+11] DIV Tl * (BLKSZ DIV MAXSZ) * MAXSZ; 
LASREC:=(T2+MAXSZ-1) DIV MAXSZ-1; 
END; 


ALLOC:=GSA[I+22] ; 


END; 


2 = IX + 1; 
END UNTIL. FKIND NEQ 2; 
REPLACE S-1 BY POINTER (PKNARRY) UNTIL = 4"90"; 
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In this glossary, definitions taken from outside sources are preceded by an abbreviation enclosed 
in parentheses. Definitions from Dictionary of Computing are preceded by DOC. Definitions from 
American National Dictionary for Information Processing Systems are preceded by ANDIPS. 
Definitions from Vocabulary for Data Processing, Telecommunications, and Office Systems are 
preceded by VDP. 


A 


active 
Pertaining to the state of a process that is executing normally, and is neither scheduled 
nor suspended. 


actual segment descriptor (ASD) 
A pointer to the location of a data or code item in memory or on a disk. 


adapter 
(1) A hardware unit that connects a data communications line to a line support 
processor (LSP). An LSP can have up to 16 adapters, numbered from 0 to 15. A data 
communications data link processor (DCDLP) has four adapters, numbered from 0 to 3. 
(2) A Network Systems Corporation device that is connected to a HYPERchannel 
network and used for networking applications between computer systems of different 
manufacturers. 


ADDLWORD 
The extra parameter words that appear in the array passed to GETSTATUS and 
SETSTATUS for certain Request Types and SUBTYPEs. When applicable, the 
number of ADDLWORDs supplied for a particular request must be designated in bit 
[38:06] of the first word of the request. ADDLWORDs are required for certain calls, _ 
such as SETSTATUS PG (Purge) unit calls. They are optional for some calls, such as 
GETSTATUS PD (Print Directory) file calls, and are never used for other calls, such as 
SETSTATUS DR (Date Reset) calls. 


address 
(1) The identification of a location in storage (memory). (2) A sequence of bits, 
a character, or a group of characters that identifies a network station or a group 
of stations, a user, or an application. (3) The location of a device in the system 
configuration. (4) The identification of the location of a disk sector. 


ALGOL 
Algorithmic Language. A structured, high-level programming language that provides 
the basis for the stack architecture of the Unisys A Series systems. ALGOL was the 
first block-structured language developed in the 1960s and served as a basis for such 
languages as Pascal and Ada. It is still used extensively on A Series systems, primarily 
for systems programming. 
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algorithm 


area 


(1) A sequence of instructions se describing the steps needed to complete a particular task. 
(2) In Network Definition Language II (NDLID, the part of a program that contains 

the adapter control and line control processes for one type of line and specifies the line 
protocol for that type of line. 


A Programming Language. A procedure-oriented language that can produce very short 
but powerful programs. 


The amount of contiguous disk space that is allocated at one time to a disk file as it is 
being created or expanded. Synonym for row. 


arithmetic expression 


An expression containing any of the following: a numeric variable, a numeric elementary 
item, a numeric literal, identifiers and literals separated by arithmetic operators, two 
arithmetic expressions separated by an arithmetic operator, or an arithmetic expression | 
enclosed in parentheses. 


arithmetic operator 


array 


(1) (DOC) An operator that specifies an operation with numeric inputs and outputs; 
for example, ADD, SUBTRACT, or DIVIDE. (2) A single character or a fixed 
2-character combination belonging to the following set: + (addition), — (subtraction), 
* (multiplication), / (division), or ** (exponentiation). 


An ordered collection of a fixed number of common elements under one name, each 
element having the same data type. Access for each element is through an index to the 
common name. 


ascending order 


ASD 


An arrangement of items in which the order progresses consecutively from the 
lowest-valued item to the highest-valued item. Contrast with descending order. 


See actual segment descriptor. 


ASD memory 


The memory architecture used on A Series systems. Memory is treated as a single 
continuous region that is indexed by the ASD table. Memory management is very 
flexible and is handled automatically by the Master Control Program (MCP). 


ASD number 


A number used as an index to the actual segment descriptor (ASD) table. The ASD 
number is contained in code descriptors and data descriptors. 


ft 


ASD table 


Glossary—2 


A memory-resident table that contains the actual segment descriptors (ASDs) for the 
syste. 
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attribute 
(1) A characteristic or property. (2) The information that describes a characteristic of an 
entity. 


autodial 
The capability of a terminal, modem, computer, or similar device to place a call over 
the switched telephone network, and to establish a connection, without operator 
intervention. 


binary 
A characteristic or condition for which there are two alternatives. A binary number 
system uses a base of 2 and the digits 0 and 1. 

bit 
The most basic unit of computer information. The word bit is a contraction of binary 
digit. A bit can have one of two values: binary 0 (sometimes referred to as OFF) and 
binary 1 (sometimes referred to as ON). 

bit rate 
The speed at which bits are transmitted over a communication channel. 

block 
(1) A group of physically adjacent records that can be transferred to or from a physical 
device as a group. (2) A program, or a part of a program, that is treated by the processor 
as a discrete unit. Examples are a procedure in ALGOL, a procedure or function in 
Pascal, a subroutine or function in FORTRAN, or a complete COBOL program. 

BNA 
The network architecture used on A Series, B 1000, and V Series systems as well as 
CP 9500 and CP 2000 communications processors to connect multiple, independent, 
compatible computer systems into a network for distributed processing and resource 
sharing. 

Boolean | 
Pertaining to variables, data items, and attributes having a value of TRUE or FALSE. 

byte 


(1) (ANDIPS) A binary character string operated upon as a unit and usually shorter than 
acomputer word. (2) On Unisys A Series systems, a measurable group of 8 consecutive 
bits having a single usage. In data communications, a byte is often referred to as a 
character or an octet. 


(1) To transmit addressing signals to establish a connection between stations. (2) In data 
communications, a sequence of events that begins when a user initiates a call request 
signal at an exchange that results in a connection. A call concludes when the connection 


8600 0346-000 Glossary-3 


Glossary 


is released. Also, a call is an attempt to reach another network user, whether or not the 
connection is successful. (3) A programmatic request for another procedure or program 
to execute. 


called program . 
A program that is the object of a CALL statement and is combined at object time with 
the calling program to produce a run unit. 


calling program | 
A program that executes a CALL statement to another program. 


CANDE 
See Command and Edit. 


catalog 
(1) One of the sections in the catalog file. The catalog is a file that contains the 
following information for all files on the system: the available versions of a file, and 
the backup copies of the available versions of a file. (2) The central disk file that 
stores the information about the disks in the system and the disk files. This file is 
named SYSTEM/CATALOG/< family index number > on cataloging systems and 
SYSTEM/ACCESS/ < family index number> on noncataloging systems. 


CD-ROM 
Compact disc read-only memory. A high-density read-only storage medium. The date is 
stored on a removable polycarbonate disk, and is read by a laser beam. 


character 
(1) The actual or coded representation of a digit, letter, or special symbol in display form. 
(2) In data communications, 8 contiguous bits (1 byte). (3) See also octet. 


character array 
In ALGOL, an array whose elements are ASCII, EBCDIC, or hexadecimal characters. 


code segment dictionary 
A memory structure that is associated with a process and that indexes the memory 
addresses of the various segments of program code used by that process. The same code 
segment dictionary can be shared by more than one process, provided that each process 
is an instance of the same procedure. A code segment dictionary is also referred to as a 
D1 stack. 


Command and Edit (CANDE) 
A time-sharing message control system (MCS) that enables a user to create and edit 
files, and develop, test, and execute programs interactively. 


Communications Management System (COMS) 
A general message control system (MCS) that controls online environments on A Series 
systems. COMS can support the processing of multiprogram transactions, single-station 
remote files, and multistation remote files. 


compile 
To convert a program written in a source language, such as COBOL or ALGOL, to 
machine code that can be executed by a computer. 


v 
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compile time 
The time during which a eompher analyzes program text and generates an object code 


file. 

compiler 
A computer program that translates instructions written in a source language, such as 
COBOL or ALGOL, into machine-executable object code. 

COMS 
See Communications Management System. 

CONTROLLER 
‘An invisible, independent runner program that is responsible for processing system 
commands, routing system messages, and scheduling jobs. 

crunch 


To return the unused portion of the last row of disk space of a disk file (beyond the 
end-of-file indicator) to the system. Only disk files can be crunched. 


D 


data comm 
See data communications. 


data communications (data comm) 
The transfer of data between a data source and a data sink (two computers, or a 
computer and a terminal) by way of one or more data links, according to APPreRHAte 
protocols. 


Data Communications ALGOL (DCALGOL) 
A Unisys language based on ALGOL that contains extensions for writing message 
control system (MCS) programs and other specialized system programs. 


data communications data link processor (DCDLP) 
A data communications processor (DCP) that combines the functions of a network 
support processor (NSP) and a line support processor (LSP) into one physical data link 
processor (DLP) and supports up to four lines of communication. 


data communications processor (DCP) 
A hardware component that was replaced by the network support processor (NSP). 


data link processor (DLP) 
A processor that serves as the saten interface to a specific peripheral device, controller, 
or communications network. 


Data Management System (DMS) 


The system responsible for storing and retrieving data while protecting data security and 
integrity. 
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database 
An integrated, centralized system of data files and program utilities designed to support 
an application. The data sets and associated index structures are defined by a single 
description. Ideally, all the permanent data pertinent to a particular application resides 
in a single database. The database is considered a global entity that several applications 
can access and update concurrently. 


database stack (DBS) | 
A stack that contains all the information necessary for the Data Management System II 
(DMSID Accessroutines to manage a database. 


DATACOMINFO file 
A file that contains a complete description of the data communications configuration, 
including algorithms, editors, and translate tables. This is the file that the Interactive 
Datacomm Configurator (IDC) modifies and from which the Master Control Program 
(MCP) initializes the data communications subsystem. 


DBS 
See database stack. 
DCALGOL 
See Data Communications ALGOL. 
DCDLP 
See data communications data link processor. 
DCP 
See data communications processor. 
DCWRITE . 
A system intrinsic that passes a specified message to the data communications controller 
(DCC). 
declaration 
A programming language construct used to identify an object, such as a type or variable, 
to the compiler. A declaration can be used to associate a data type with the object so that 
the object can be used in a program. . 
descending order 
An arrangement of items in which the order progresses consecutively from th 
highest-valued item to the lowest-valued item. Contrast with ascending order. 
directory 


(1) A table of contents listing the files contained on a device. The device is usually a disk 
or a tape. (2) A list of file names organized into a hierarchy according to similarities 
‘in their names. File names are grouped in a directory if their first name constants 
(and associated usercodes) are identical. These groups are divided into subdirectories 
consisting of those file names whose first two name constants are identical, and so on. 
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discontinue 
(1) To terminate a referenced task. (2) To cause a process to terminate abnormally. A 
process can be discontinued by operator commands, by statements in related processes, 
or by the system software. 


disk 
A random-access data storage device consisting of one or more circular platters that 
contain information recorded in concentric circular paths called tracks. Data on a disk 
are accessed by movable read/write heads. Some disks are removable. Synonym for disk 
pack, pack. 

disk file 
A file stored on a disk or disk pack. 

disk file header 
A data structure that contains information about a disk file, such as the physical location 
of the file on the disk and various file attributes. A disk file header is also referred to as 
a header. 

disk header 
See disk file header. 

disk subsystem 
Those software components of the system that are directly involved with the creation, 
maintenance, and deletion of disk files. This software also creates and maintains data 
structures such as disk labels, disk file headers, directories, and catalogs. 

display form 


A file title that contains one or more identifiers separated by slashes and that can include 
a usercode in parentheses, an asterisk, or an ON <family name> clause. The following 
is an example of a display form file title: (SMITH)REPORT/JULY ON ACCOUNTS. 


distributed systems service (DSS) 
One of a collection of services that are provided on Unisys hosts to support 
communications across multihost networks. DSS can be services such as file handling, 
station transfer, and mail transfer. 


DLP 

See data link processor. 
DMS 

See Data Management System. 
DSS 


See distributed systems service. 


E 


E-mode processor (EMP) 
The type of processor used in A Series architecture. 
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EBCDIC 
Extended Binary Coded Decimal Interchange Code. An 8-bit code representing 256 
graphic and control characters that are the native character set of most mainframe 


systems. 
EBCDIC array 
In ALGOL, an array whose elements are EBCDIC characters. 
EIOU 
See external input/output unit. 
EMP 
See E-mode processor. 
EMS 
See Entry and Medium Systems. 
end of file (EOF) 
A code at the end of a data file that signals that the last record in the file has been 
processed. 
end of job (EOJ) 
(1) The termination of processing of ajob. (2) In the Communications Management 
System (COMS) and X.25, the control code that signals the receiver that a job has 
completed. 
end of task (EOT) 


The termination of processing of a task. — 


Y 
end of transmission (EOT) 
A control code that tells the receiver that all user data (text) has been sent. 


end-of-text character (ETX) 
A keyboard character used to signal the end of input. 


Entry and Medium Systems (EMS) 
A designation referring to the Micro A and A 1 through A 10 systems. 


EOF 
See end of file. 
' EOS 
See end of job. 
EOT 
(1) See end of task. (2) See end of transmission. 
ETX 
See end-of-text character. 
execution 


The act of processing statements in a program. 
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external input/output unit (EIOU) 
An J/O unit that has been added to the system by means of a generalized interface that 
causes the unit to be handled by a library instead of being managed directly by the MCP 
code file. 


family 
(1) One or more disks logically grouped and treated as a single entity by the system. 
Each family has a name, and all disks in the family must have been entered into the 
family with the RC (Reconfigure Disk) system command. (2) The name of the disk or 
disk pack on which a payer file is located. 


family index 
A 3-digit number the system assigns to a disk when the disk is added to a family. This 
family index value must be in the range 1 to 255, inclusive. The base pack is assigned 
the family index number, the first continuation pack is assigned 002, and so on. A family 
index is also referred to as a family index number. 


family index number 
See family index. 


family name 
(1) The name, consisting of up to 17 alphanumeric characters, assigned by an installation 
to identify a family of disks. (2) The name (label) of the disk or disk pack on which 
a physical file is located. The family name of a file is determined by the value of the 
FAMILYNAME file attribute. (8) The name of the logical group of disk packs on which a 
physical file is located. A family name consists of from 1 to 17 alphanumeric characters 
and is assigned by the installation. 


field 
A consecutive group of bits within a word or a component of a record that represents a 
logical piece of data. 

file 
(1) Anamed group of related records. (2) See logical file, physical file. 

file attribute 
An element that describes a characteristic of a file and provides information the system 
needs to handle the file. Examples of file attributes are the file title, record size, number 
of areas, and date of creation. For disk files, permanent file attribute values are stored in 
the disk file header. 

format 
(1) The organization of an array of storage points in memory. Formats, and other 
memory structures, make it possible for the Master Control Program (MCP) to identify 
and move areas of memory. (2) The specific arrangement of a set of data. 

function 


(1) An assigned purpose, activity, or significance. (2) A subroutine that returns a value. 
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H 


halt/load | 
A system-initialization procedure that temporarily halts the system and loads the 
operating system from a disk to main memory. 


HC unit : 
See host control (HC) unit. 


HDP 
See host dependent port. 


HDU 
See host data unit. 


hex 
See hexadecimal. 


hexadecimal (hex) 
Pertaining to the base 16 numbering system. Decimal digits 0 through 9 are represented 
by the characters 0 through 9. Decimal digits 10 through 15 are represented by the 
characters A through F- 


host 
(1) An independent system ina BNA network. Each host has its own operating system 
and resources and is identified by a hostname. (2) The computer system containing 
the message control system (MCS) to which a given station is connected. (3) An I/O 
subsystem requestor, such as an I/O processor (IOP) or a network support processor 
(NSP). (4) The computer system that contains the database system with which a 
workstation interacts. 


host control (HC) unit 
A specialized data link processor (DLP) that enables host systems to communicate 
through an intersystem control (ISC) hub on a channel-to-channel communications 
interface between A Series and CP9500 systems. 


host data unit (HDU) | 
The A 12 and A 15 system host interface to the I/O subsystem. An HDU is configured 
with up to three host dependent ports (HDPs), each of which supports two message level 
interface (MLD) cables. 


host dependent port (HDP) 
A hardware module capable of interfacing a processor to the message level interface 
(MLD. 


HYPERchannel 
A specialized data link processor (DLP) that enables communication between 
systems through HYPERchannel adapters. HYPERchannel is a message-level I/O 
channel-to-channel communications interface between A Series systems. It can also 
provide an interface to other systems for which a HYPERchannel adapter exists. 
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Vo 
Input/output. An operation in which the system reads data from or writes data to a file 
on a peripheral device such as a disk drive. 
1/O processor (IOP) 
A specialized processor for moving data between system memory and the I/O subsystem. 
IDC 


See Interactive Datacomm Configurator. 


independent runner (IR) . 
A Master Control Program (MCP) procedure that is initiated as an independent process. 
The procedure is executed in its own process stack rather than in the stack of a user 
process. An independent runner (IR) can be either visible or invisible. If the IR is 
visible, its status can be interrogated. If the IR is invisible, it does not appear in mix 


displays. 
index . 
(1) A value used to specify a particular element of an array variable. (2) A computer 
storage location, the contents of which identify a particular element in a table. 
integer 


A whole number. 


Interactive Datacomm Configurator (IDC) 
A Unisys interactive, menu-driven utility that enables the user to create, interrogate, 
- and modify data communications network configurations. 


intersystem control (ISC) 
A direct hardware connection that enables data transfer between independent systems. 
The components that make up an ISC are a hub and its attached host control (HC) 
units. The HC unit type used to connect an I/O channel to a hub depends on the type of 
machine, specifically the I/O subsystem protocol. 


IOP 

See I/O processor. 
IR 

See independent runner. 
ISC 


See intersystem control. 


job . 
(1) A group of one or more tasks under the control of a single Work Flow Language 
(WFL) program. The system assigns each job a mix number and treats each job asa 
discrete unit of work. (2) See WFL job. 
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job file | 
A disk file that is associated with a job and contains the job log. The job file for a Work 
Flow Language (WFL) job also serves as the object code file for the job, and includes job 
restart information, data specifications, and a copy of the WFL source program. 

job queue 


A structure in the system software that stores a list of jobs that have been compiled and 
are waiting to be initiated. 


L 


LEM 
See line expansion module. 

library 
(1) A collection of one or more named routines or entry points that are stored in a file 
and can be called by other programs. (2) A program that exports objects for use by user 
programs. 

library maintenance 
A procedure that copies disk files from a disk to a disk, from a disk to a tape, from a 
tape to a disk, and from a tape to a tape. The procedure is invoked by the Work Flow 
Language (WFL) ADD or COPY statements. 

line 


(1) A row of text ina printout. (2) A data transmission link between two computers or 
between a computer and its associated terminals. (3) In Network Definition Language II 
(NDLI)), a logical construct representing a particular line adapter and all data structures 
associated with that line adapter. . 


line expansion module (LEM) 
A hardware module that enables the attachment of up to seven bases to a single message 
level interface (MLI) port. 


line support processor (LSP) 
The data communications subsystem processor that manages communication with the 
host and initiates processes that control the input of messages to and the output of 
messages from data communications lines. 


link . 
(1) In Data Management System II (DMSID), a field that enables one data set record to 
refer to another. (2) In the Communications Management System (COMS), to join the 
application program to COMS. 


logging 
The process of recording events and, often, their times of occurrence. 


logical file 

_ A file variable declared in a program, which represents the file and its structure to the 
program. A logical file has no properties of its own until it is described by file attributes 
or associated with a physical file. 
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logical station number (LSN) 
(1) In Network Definition Language II (NDLII), a unique number assigned to each 
station in a network. Each station has an LSN assigned according to the order in which 
the stations are defined in NDLII. The first defined station is 0000. (2) In the Interactive 
Datacomm Configurator (IDC), a unique number assigned to each station structure. 
When IDC creates the DATACOMINFO file from the Network Information File II 
(NIFID), it assigns an LSN to each structure sequentially, beginning with the number 2. 
The numbers allocated by IDC are the same as those used by the Master Control 
Program (MCP) to identify a station. 


LSN 
See logical station number. 


See line support processor. 


M 


maintenance display terminal (MDT) 
The name given to the system control terminal (SCT) when it is in maintenance mode. 
The MDT enables the operator to access the maintenance subsystem. 


mapping 
(1) A transformation from one set to another set. (2) Acorrespondence. (3) A 
description of the way in which different record types of a database are associated with 


one another. 


Master Control Program (MCP) 
An operating system on A Series systems. The MCP controls the operational 
environment of the system by performing job selection, memory management, peripheral 
management, virtual memory management, dynamic subroutine linkage, and logging of 
errors and system utilization. 


MCP 
See Master Control Program. 
MCS 
See message control system. 
MDT 
See maintenance display terminal. 
memory 
A temporary storage area where data and programs are placed while they are being 
processed. 


memory storage unit (MSU) 
The smallest unit of memory that can be readied or saved on an A Series system. An 
MSU contains 1 million to 4 million words, depending on the type of MSU. MSU types 


cannot be mixed on a system. 
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memory subsystem module (MSM) 
A high-speed, random-access storage facility on host data unit (HDU) and resource 
management module (RMM) systems that contains storage boards and processing cards 
for the memory subsystem. 


message 
(1) Any combination of characters and symbols designed to communicate information 
from an originator to one or more destinations. (2) The text sent to the user from a 
program. A message can be either displayed on the screen or printed. (3) In data 
communications, any information-containing data unit, in an ordered format, sent by 
means of a communications process to a named network entity or interface. A message 
contains the information (text portion) and controls for routing and handling (header 
portion). (4) In Data Communications ALGOL (DCALGOL), a special form of array. 
Two types of messages are recognized by a message control system (MCS): those used 
with DCALGOL DCWRITE statements and those generated elsewhere in the data 
communications subsystem that appear in an MCS queue. 


message area 
In the Communications Management System (COMS), an area of the communication 
structure in which the message is contained. 


message control indicator 
A value used to select a type of output for a message. 


message control system (MCS) 
A program that controls the flow of messages between terminals, application programs, 
and the operating system. MCS functions can include message routing, access control, 
audit and recovery, system management, and message formatting. 


message level interface (MLI) 
The interface between the host system, the I/O subsystem, and the data communications 
subsystem. 


microcode 
A sequence of elementary instructions that corresponds to a specific computer operator. 
For example, a sequence of microcode is executed for each A Series system operator. 


The set of processes that currently exist on a particular computer. The mix can include 
active, scheduled, and suspended processes. 


mix number 
A 4-digit number that identifies a process while it is executing. This number is stored in 
the MIXNUMBER task attribute. 


MLI F é 
See message level interface. 


MLS 
See multilingual system. 
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MSM 
See memory subsystem module. 


MSU 
See memory storage unit. 


multilingual system (MLS) 
A system for developing and accessing output messages, online help text, and menu - 
screens in different natural languages, such as English, French, and Spanish. 


N 


network information file (NIF) 
See network information file II. 


network information file II (NIFID 
The file generated when a Network Definition Language IT (NDLII) program is compiled. 
This file contains line support processor (LSP) and network support processor (NSP) 
code, data structures, and other information. A NIFII is also generally referred to as a 
network information file (NIF). 


network initialization file 
A file that provides network configuration information to individual nodes, which enables 
the nodes to initialize themselves into a complete network by communicating with each 
other. This file is also referred to as the INIT file or NETINIT file. 


network support processor (NSP) 
A data communications subsystem processor that controls the interface between a host . 
system and the data communications peripherals. The NSP executes the code generated 
by the Network Definition Language II (NDLIJ) compiler for line control and editor 
' procedures. An NSP can also control line support processors (LSPs). 


NIF 

See network information file IT. 
NIFII 

See network information file II. 
node 


(1) A data structure that consists of a list, a set of properties, and a block part. Either 
the list or the properties can be absent. (2) In a data communications network, a point 
at which one or more functional units interconnect with data transmission lines. 


noncharacter array 
A single dimension array whose size is measured in words, such as ARRAY A [0:10]. 


nonresident file 
A file stored on a backup tape, or a backup copy of a file that is stored on a different disk 
family from that on which the primary copy of the file is stored. This term does not 
always pertain to the RESIDENT file attribute. 
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NSP 


See network support processor. 


(1) In data communications, 8 contiguous bits (1 byte). (2) See also character. 


ODT 
See operator display terminal. 


operator display terminal (ODT) 
(1) A system control terminal (SCT) configured for direct communication with the 
operating system. The ODT is used primarily by operations personnel for entering 
commands that control and direct the system and its resources. (2) The name given to 
the system control terminal (SCT) when it is used as an ODT. 


overlay 


To load code or data into a memory area that was previously allocated to other code or 
data, and to write any data that previously occupied the area to a disk file if necessary. 


p 


p-bit 
See presence bit. 

pack (PK) 
(1) Arandom-access data storage device consisting of one or more circular platters that 
contain information recorded in concentric circular paths called tracks. Data on a pack 
are accessed by movable read/write heads. Some packs are removable. (2) Synonym for 
disk pack, disk. 

page 
(1) A portion of a segmented array. (3) A structure in memory identified by unique 
address locations, or by subdivisions of a program running in memory. 

paged array 
An array that is automatically divided (paged or segmented) at run time into smaller 
segments. 

parameter 


(1) A quantity or item of information that can be given a different value each time a 
process is repeated. (2) An identifier associated in a special way with a procedure. 

A parameter is declared in the procedure heading and is automatically assigned a 
value when the procedure is invoked. (3) An object or value that is passed from an 
actual parameter and received by a formal parameter. (4) An element of a command, 
statement, or procedure that enables a user to determine the exact functionality of 
that command, statement, or procedure. A parameter can be variable or constant, and 
required or optional. 
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peripheral 
(1) A device used for input, output, or file storage. Examples are magnetic tape drives, 
disk drives, printers, or operator display terminals (ODTs). (2) Synonym for peripheral 


device. 
physical file 
A file as it is stored on a particular recording medium such as a disk or a tape. 
PK 
See pack. 
pointer 
A variable with KIND equal to POINTER. A pointer is used to store a reference toa 
designated location in a designated array with a designated character size. 
port 


A point of entry into a computer, network, or other electronic device. 


presence bit (p-bit) 
A bit in a descriptor that indicates whether the address in the descriptor references a 
location in main memory or on a disk. If the presence bit is equal to 1, the address is in 
physical memory. If the presence bit is equal to 0, the address is either on a disk, or no 
memory or disk area is assigned for the descriptor yet. A p-bit is used only in the actual 
segment descriptor (ASD) table on ASD systems because of the memory architecture. 


priority 

. Acharacteristic associated with a process that determines its precedence in the use of 
system resources. A process with higher priority executes more quickly than it would if 
it had lower priority. 


privileged process 
A process that er normal system security checks, thereby gaining access to a large | 
number of system resources. A process initiated by a privileged program or run under a 
privileged usercode is a privileged process. 


privileged program 
An object code file marked as privileged with the PP (Privileged Program) system 
command, 


privileged user 
_Auser with the PU usercode attribute assigned to his or her usercode in the 
USERDATAFILE. No file-access security checking is normally performed for actions 
taken under a usercode with privileged status. 


procedure 
A block that can be invoked by statements elsewhere in the same program or, in 
some cases, by statements in another program. In most instances, a procedure has 
a procedure heading and a procedure body. Examples are a procedure in ALGOL, a 
procedure or function in Pascal, a subroutine or function in FORTRAN, or a complete 
COBOL program. 
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process 
(1) The execution of a program or of a procedure that was initiated. The process has 
its own process stack and process information block (PIB). It also has a code segment 
dictionary, which can be shared with other processes that are executions of the same 
procedure. (2) A software application; that is, any aiid or systematic sequence of 
operations that produces a specified result. 


programmable read-only memory (PROM) 
A type of memory that can be modified once for specific purposes, and then can only be 


read. 
PROM 

See programmable read-only memory. 
pseudostation 


A station created by the Master Control Program (MCP) that can be attached to, and 
controlled by, a message control system (MCS) like a “real” station. Unlike a real 
station, however, a pseudostation is not declared in the SOURCENDLI file or the 
DATACOMINFO file, has no line assigned, and does not need a corresponding physical 
terminal on the local host. 


queue 
A data structure used for storing objects; the objects are removed in the same order they 
are stored. 


read 
(1) The process of acquiring or interpreting data from an outside medium. (2) (ANDIPS) 
To acquire or to interpret data from a storage device, from a data medium, or from 
another source. 

ready 
In BNA, the condition that enables a station to receive data that is sent to it. 

ready queue (READYQ) 
A list, in order of priority, maintained by the Master Control Program (MCP), of the 
processes that are waiting for service from a processor. 

READYQ . : 
See ready queue. 

real 


In data management, pertaining to signed or unsigned, fractional or whole values in 
single-precision, floating-point form. 


a 
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rebuild 
(1) In the disk subsystem, a concept that refers to either of the following: a family 
rebuild, in which the system constructs the file access structure table (FAST) entry for a 
family by reading its system directory; or a catalog rebuild (on a cataloging system), in 
which the system updates the file access structure table (FAST) entry with information 
about cataloged files. (2) In database management, a recovery process in which the 
entire database is loaded from one or more sets of dump tapes. The recovery process 
then applies the audit trail after-update record images to move the database forward in 
time. 


remote file 
A file with the KIND attribute specified as REMOTE. A remote file enables object 
programs to communicate interactively with a terminal. 


resident file 
The primary copy of the file that is stored on a disk, regardless of whether or not the 
disk is online. Backup copies of files stored on another disk family are not considered 
resident. This term does not always pertain to the RESIDENT file attribute. 


resource management module (RMM) 
A hardware module that interfaces with the I/O subsystem and schedules tasks on the 
E-mode processor (EMP) by way of a message protocol. 


RMM 
See resource management module. 

row . 
(1) The amount of contiguous disk space that is allocated at one time to a disk file as it is 
being created or expanded. The Master Control Program (MCP) uses the term row in 
its processing. (2) See also area. 

run time 
(1) The time during which an object code file is executed. (2) Synonym for execution 
time. 


S 


save memory : 
An area of memory that cannot be overlaid as long as the item with which it is associated 
is allocated. 


save storage 
See save memory. 


SCT 
See system control terminal. 


sector 
A subdivision of a track on a disk. A sector is the minimum addressable area on a disk 
pack. Unisys A Series system sectors are 30 words, or 180 bytes, long. Synonym for 
segment. 
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segment 
A subdivision of a track on a disk. A segment is the minimum addressable area on a disk 
pack. Unisys A Series system segments are 30 words, or 180 bytes, long. Synonym for 


sector. 

segment dictionary 
See code segment dictionary. 

segmented array 
See paged array. 

session 
The interactions between a user and a message control system (MCS) during a particular 
period of time that is assigned an identifying session number. Logging on initiates a new 
session; logging off terminates a session. Each Menu-Assisted Resource Control (MARC) 
or Command and Edit (CANDE) dialogue at a terminal accesses a different session. 

SIM 
See storage interface module. — 

stack 
A region of memory used to store data items in a particular order, usually on a last-in, — 
first-out basis. 

standard form file title 
An internal form that the system uses to code file titles and other names. It is the result 
of a DISPLAYTOSTANDARD call. 

station 


(1) The outer end of a communication line. A station can correspond to a single terminal 
connected on a single line, or several stations can be connected on a line. (2) The 
combination of functional units comprising the data terminal equipment (DTE), data 
circuit-terminating equipment (DCE), and their common interface. (3) In the Interactive 
Datacomm Configurator (IDC), a data structure that describes the attributes of a 
physical terminal. (4) In data communications, a data structure that relates a logical 
abstraction to either a physical device or a pseudostation. 


storage interface module (SIM) 
A subdivision of memory storage on A 12 and A 15 systems. A SIM controls from one to 
four memory storage units (MSUs) on A 12 systems and from one to eight MSUs on A 15 
systems. 


subscript 
A number that is an index into an array. 


subscripted queue 
A queue that is formed by subscripting a queue array and that is represented by a queue 
reference word accessed through one or more data descriptors. 


suspended process 


A process that has temporarily stopped executing and cannot continue until appropriate 
operator or programmatic action is taken. A process can be suspended deliberately by an 


Glossary—20 . 8600 0346-000 


Glossary 


operator command or a statement in a program. In addition, the operating system can 
suspend a process automatically, for example, if the process has requested a file that is 
missing. | 


switched line 
In data communications, a communications link for which the physical path, established 
by dialing, can vary with each use. 


sync 
See synchronous transmission. 


synchronous transmission 
In data communications, a mode of data transmission in which each bit of data is 
transmitted at a frequency determined by an external clock source. 


system command 
Any of a set of commands used to communicate with the operating system. System 
commands can be entered at an operator display terminal (ODT), in a Menu-Assisted 
Resource Control (MARC) session, or by way of the DCKEYIN function in a privileged 
Data Communications ALGOL (DCALGOL) program. 


system control terminal (SCT) 
A terminal used to enter information. An SCT can be used three ways: as an operator 
display terminal (ODT) to interface with the operating system, as a maintenance display 
terminal (MDT) to interface with the maintenance subsystem, or as a remote display 
terminal (RDT) to interface with remote support. The windows providing these uses are 
available once the automatic initialization sequence has finished. 


system directory ; 
(1) A special structure on each disk family that the system uses to locate files on that 
family. The system directory, also referred to as the flat directory, contains a disk file 
header for each permanent file in the family. (2) The logical directory for nonusercoded 
files. 


system file . 
A file with a special security status that protects it from being removed, retitled, 
or replaced except by selected system interfaces. For example, the job description 
(JOBDESC) file can be removed only by the ??RJ (Remove JOBDESC File) system 
command. 


tanking 
In the transaction processing system (TPS), the operation in which the transaction 
processor (TP) library stores transactions in a tank journal and does not process 
them against the database. A tank journal can be any transaction journal except the 
TRHISTORY journal. 
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task 
(1) A dependent process. (2) A single, complete unit of work performed by the system, 
such as compiling or executing a program, or copying a file from one disk to another. 
Tasks are initiated by a job, by another task, or directly by a user. (3) See also process. 
task attribute 


Any of a number of items that describe and control various aspects of the execution of a 
process. Various operator commands, message control system (MCS) commands, and 
programming language statements can be used to interrogate and modify the values of _ 
task attributes. The task attributes of a process are stored in the process information 
block (PIB). 


task control processor (TCP) 
A special purpose processor that schedules tasks on the E-mode processor (EMP) by way 
of a message protocol. 


TCP 
See task control processor. 

terminal 
An I/O device designed to receive or send source data in a network. 

timestamp | 
An encoded, 48-bit numerical value for the time and date. Various timestamps are 
maintained by the system for each disk file. Timestamps note the time and ts a file 
was created, last altered, and last accessed. 

trunk 


A cable connecting HYPERchannel adapters used to send data between computer 
systems of different manufacturers. 


U 


UINFO table 
See unit information (UINFO) table. 


unit information (UINFO) table 
An internal data structure in the Master Control Program (MCP) code that maintains 
state information for every peripheral that is controlled directly by the MCP. 


unit number 
A number assigned by an installation to a peripheral device, such as a disk drive, and 
used to identify the device. The unit number commonly appears in conjunction with an 
acronym indicating the type of unit, which provides a unique identifier for a particular 
peripheral. 


universal time (UT) 
The time zone formerly known as Greenwich Mean Time. 
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usercode 
An identification code used to establish user identity and control security, and to provide 
for segregation of files. Usercodes can be applied to every task, job, session, and file on 
the system. A valid usercode is identified by an entry in the USERDATAFILE. 


UT 
‘ See universal time. 


V 


vertical parity check 
A parity check that verifies the validity of individual characters for a block. 


volume 
The medium of a mass storage device such as a disk, disk pack, or tape reel. The term 
volume is not restricted to the volume library on a cataloging system or the volume 
directory on a system with tape volume security. For example, on the BTOS family 
of workstations, the hard disk is a volume, and each floppy disk is a volume. When a 
volume is initialized, it is assigned a volume name and an optional password. 


volume directory 
A section of the catalog that tracks the status of tapes on a system that uses the tape 
security subsystem. 


volume library 
A section of the catalog that keeps track of all tapes and volumed disks used on a 


cataloging system. 

WFL 

See Work Flow Language. 

WEL job 
(1) A Work Flow Language (WFL) program, or the execution of such a program. (2) A 
collection of Work Flow Language (WFL) statements that enable the user to run 
programs or tasks. 

word | 
A unit of computer memory. On A Series systems, a word consists of 48 bits used for 
storage plus tag bits used to indicate how the word is interpreted. 

Work Flow Language (WFL) | 
A Unisys language used for constructing jobs that compile or run programs on A Series 
systems. WEIL includes variables, expressions, and flow-of-control statements that offer 
the programmer a wide range of capabilities with regard to task control. 

write 


(1) The process of transferring information to an output medium. (2) To record data ina 
storage device or location, or in a register. 


8600 0346-000 Glossary-23 


Glossary-24 8600 0346-000 


Bibliography 


A Series ALGOL Programming Reference Manual, Volume 1: Basic Implementation 
(form 8600 0098). Unisys Corporation. 


A Series CANDE Operations Reference Manual (form 8600 1500). Unisys 
Corporation. 


A Series Communications Management System (COMS) Operations Guide (form 
8600 0833). Unisys Corporation. 


A Series Communications Management System (COMS) Programming Guide (form 
8600 0650). Unisys Corporation. 


A Series DCALGOL Programming Reference Manual (form 8600 0841). Unisys 
Corporation. 


A Series Disk Subsystem Administration and Operations Guide (form 8600 0668). 
Unisys Corporation. 


A Series File Attributes Programming Reference Manual (form 8600 0064). Unisys 
Corporation. Formerly A Series I/O Subsystem Programming Reference 
Manual. 


A Series I/O Subsystem Programming Guide (form 8600 0056). Unisys Corporation. 
Formerly A Series I/O Subsystem Programming Reference Manual. 


A Series MultiLingual System (MLS) Administration, Operations, and Programming 
Guide (form 8600 0288). Unisys Corporation. 


A Series Security Administration Guide (form 8600 0973). Unisys Corporation. 


A Series System Commands Operations Reference Manual (form 8600 0395). Unisys 
Corporation. 


A Series SYSTEMSTATUS Programming Reference Manual (form 8600 0452). Unisys 
Corporation. 


A Series Task Attributes Programming Reference Manual (form 8600 0502). Unisys 
Corporation. Formerly A Series Work Flow Administration and Programming 
Guide. 


A Series Work Flow Language (WFL) Programming Reference Manual (form 
8600 1047). Unisys Corporation. 


American National Dictionary for Information Processing Systems (technical report). 
- American National Standards Committee X3, Information Processing Systems. 
Washington, DC: Computer and Business Equipment Manufacturers Association 
(CBEMA), 1982. 


8600 0346-000 Bibliography—1 


Bibliography 


Dictionary of Computing. Frank J. Galland (ed.). New York: John Wiley & Sons, 
1982. 


Vocabulary for Data Processing, Telecommunications, and Office Systems 


(form GC10-1699-6). Poughkeepsie, New York: International Business Machines 
Corporation, 1981. 


Bibliography—2 | 8600 0346-000 


Index 


A 


AB (Auto Backup) 
GETSTATUS call, 3-7 
SETSTATUS call, 12-3 
ACQUIRE (Acquire Resource) 
SETSTATUS call, 12-5 
AD (Access Duplicate) 
SETSTATUS call, 9-5 
additional words 
definition, 1—2 . 
use in GETSTATUS mix requests, 2~1 
use in SETSTATUS mix requests, 8~2 
ADDLINFOF field 
in GETSTATUS directory calls, 4-7 
in the array parameter, 4-5 
ADDLWORDs 
definition, 1-2 
use in GETSTATUS mix requests, 2-15 
use in SETSTATUS mix requests, 8-2 
ADM (Automatic Display Mode) 
SETSTATUS call, 12-8 
AR (Archive Release) 
SETSTATUS call, 9-7 
ARCCOPY (Archive Copy) 
SETSTATUS call, 9-9 
ARCDUPLICATE (Archive Duplicate) 
SETSTATUS call, 9-11 
archive backup info format 
GETSTATUS directory calls, 4-19, 4-20 
archive directory 
copying records with a GETSTATUS call, 
4-44 


reading a record with a GETSTATUS call, 
4-43 
ARCHIVE RECORD ADD 
SETSTATUS call, 10-1 
ARCHIVE RECORD PURGE 
SETSTATUS call, 10-3 
ARCREPLACE (Archive Replace) 
SETSTATUS call, 9-13 
array parameter in GETSTATUS directory 
calls, 4—5 


8600 0346-000 
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ASDU (ASD Usage) 
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SETSTATUS call, 9-15 
AX (Accept) SETSTATUS call, 8-5 


BNA (BNAv2) command, 3-20 
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SETSTATUS call, 9—16 
BNAv1 (NET) command, 3-20 
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BNAv2 (BNA) command, 3-20 
BR (Breakout) 
GETSTATUS call, 2-12 
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catalog information returned for 
GETSTATUS directory call, 4-16 

CDROMF field in GETSTATUS directory 

: calls, 4—4 

CF (Configuration File) 

SETSTATUS call, 9-17 

CF (Configuration File) system command, 
3-4 

Change MCP (CM) system command, 3-4 

Change Supervisor (CS) system command, 
3-4 

CHANGE system file STATUS 

SETSTATUS call, 9-18 
CM (Change MCP) 

GETSTATUS call, 3-2, 3-6 

SETSTATUS call, 9-19 
COMPILERTARGET (Set Default TARGET 

Value) 

SETSTATUS call, 9-21 
COMPILERTARGET system command, 3-4 
Configuration File (CF) system command, 

3-4 
continuation of a directory search, 4-31 
COPYCAT (Copy Active Catalog) 

SETSTATUS call, 9-23 
Core Usage (CU) system command, 3-4 
CP (Control Program) 

SETSTATUS call, 9-24 
CS (Change Supervisor) 

GETSTATUS call, 3-6 

SETSTATUS call, 9-25 
CS (Change Supervisor) system command, 

3-4 
CU (Core Usage) system command, 3-4 
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data comm group returned by GETSTATUS, 
3-28 
DC system command, 3—4 
DD (Directory Duplicate) 
SETSTATUS call, 9-26 
dependent task accounting attributes 
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GETSTATUS call, 3-38 
SETSTATUS call, 9-101 


DF (Empty Dumpdisk File) 


SETSTATUS call, 9-28 


directory calls, GETSTATUS, 4-1 


ADDLINFOF field, 4-7 
archive backup information format, 4-19, 
4-20 
array parameter, 4-5 
catalog information returned, 4—16 
continuation of a directory search, 4-31 
ERRORF field, 4-9 
example, 4-32, D-1 
file generation information, 4-17 
file status word, 4—7 
fixed info link word, 4-8 
ERROFF field, 4—9 
LEVELF field, 4-9 
LINKF field, 4-9 
VALUFF field, 4-9 
format of results returned, 4-6 
hypothetical examples, 4-35 
LEVELF field, 4-9 
LINKF field, 4-8, 4-9 
MASK parameter, 4—4 
NEXTLEVELLINKF field, 4-8 
RESIDENTSTATEF field, 4-8 
returned archive information, 4-18 
searching for a specific file, 4-21 
searching for all files under a given 
directory, 4-26 
searching the entire usercode directory, 
4-27 
searching the nonusercode directories, 
4-27 
soft error word, 4-6 
SUBCLASS parameter, 4—4 
CDROMEF,; 4-4 
MAXCATLEVELF field, 4—4 
MAXLEVELF field, 4—4 
ORGLEVELF 4—4 
SUBVALUEIF subfield, 4—7 
SUBVALUE2F subfield, 4—7 
SUBVALUESF subfield, 4—7 


_ TYPE parameter, 4-1 


DISPLAYFORMNAMEFF field, 4—2 
GSLINKINONPARTF field, 4-4 
ONLYSYSTEMFILESF field, 4~2 
RETAINUSERCODFF field, 4-3 
RETURNFULLNAMEF field, 4~3 
RETURNRESIDENTF field, 4-2 
SUBTYPEF field, 4-1 
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TYPEF field, 4-1 
USERCODEONLYF field, 4-3 
WAITFORFILFEF field, 4-3 
using family names, 4-6 
VALUEF field, 4-7, 4-9 
directory requests 
GETSTATUS 
PD (Print Directory), 4-1 
SETSTATUS 
ARCHIVE RECORD ADD, 10-1 
ARCHIVE RECORD PURGE, 10-3 
disk and tape requests 
GETSTATUS 
PV (Print Volume), 5—1 
TV (Type Volume), 5-3 
Disk Location (DL) system command, 3—4 
Disk Resource Control (DRS) system 
command, 3-4 
disk resource control subsystem 
information returned by, 3-17 
disk utilization information returned by 
GETSTATUS, 4-39 
disk volume GETSTATUS calls, 5-1 
Display Label and Paths (OL) command, 6-1 
DISPLAYFORMNAMEFF field in | 
GETSTATUS directory calls, 4-2 
DL (Disk Location) . 
SETSTATUS call, 9-29 
DL (Disk Location) system command, 3-4 
DN (Dump Name) 
GETSTATUS call, 3-8 
SETSTATUS call, 9-32 
DO (Diagnostic Options) 
GETSTATUS call, 3-10 
SETSTATUS call, 8-7 
DR (Date Release) 
SETSTATUS call, 9-33 
DRC (Disk Resource Control) 
GETSTATUS call, 3-17 
SETSTATUS call, 9-35 
DRC (Disk Resource Control) system 
command, 3—4 
DS (Discontinue) 
SETSTATUS call, 8-8 
DU (Disk Utilization)system command 
information returned by GETSTATUS, 
4~39 
DUMP (Dump Memory) 
SETSTATUS call, 8-10, 9~37 
dynamic MASK 
definition, 1-2 
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use in GETSTATUS directory requests, 
4-22 
use in GETSTATUS mix requests, 2-15 


a = 


ERRORF field 

in GETSTATUS directory calls, 4-9 

in soft error words, 4—6 

in the array parameter, 4—5 
errors 

GETSTATUS, 1-3 

hard error table, A-1 

SETSTATUS calls, 7-2 

soft error table, B—1 
ERRORVALUEF field 

in soft error words, 4—7 

in the array parameter, 4-5 


F 


FA (File Attribute) 
SETSTATUS call, 8-12 


family names with GETSTATUS directory 


calls, 4-6 
file accounting attributes 
GETSTATUS call, 3-38 
SETSTATUS call, 9-101 


file generation information for GETSTATUS 


directory calls, 4-17 
file status word 
in GETSTATUS directory calls, 4-7 
fixed info link word 
in GETSTATUS directory calls, 4-8 
ERRORF field, 4-9 
LEVELF field, 4-9 
LINKF field, 4-9 
VALUEF field, 4—9 
FM (Form Message) 
SETSTATUS call, 8-14 
FORM (Assign Form ID) 
SETSTATUS call, 12-9 
format of words in the array ARY, 4-5 
FR (Final Reel) 
SETSTATUS call, 8-16 


- FREE (Free Resource) 


SETSTATUS call, 12-11 
FS (Force Schedule) 
SETSTATUS call, 8-17 
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G 


GC (Group Configuration) 
GETSTATUS call, 3-10 


GC (Group Configuration) system command, 


3-4 
GETSTATUS 
ADDLWOERDs, 1-2 
Array limits, 1-2 
ASD table information, 3-19 
copying a volume directory, 4-42 


copying records from an archive directory, 


4-44 
directory calls, 4-1 
archive backup information format, 
4-19, 4-20 
array parameter, 4—5 
catalog information returned, 4~16 
file generation information, 4-17 
MASK parameter, 4—4 
returned archive information, 4-18 
SUBCLASS parameter, 4—4 
disk and tape volume calls, 5-1 
DU (Disk Utilization) system command, 
4-39 
file search 
directory calls, 4-26 


format of results returned from directory 


calls, 4-6 
general information, 1-1 


info returned for DRC subsystem (MASK 


bit 14), 3-17 
memory dump type, 3-22 
open file information, 4-47 


optional dynamic MASK and SUBCLASS 


values, 1-2 
PA system command, 6-6 
reading an archive directory record, 4-43 
Request Type categories, 1-1 
searching for a specific file, 4-21 


SHOWOPEN (Show Open Files) call, 4-47 


system directories, copying, 4—40 

volume libraries, copying, 4~38 
GETSTATUS call 

HLUNIT system command, 3-23 

MB (Make Boot) system command, 3-24 
GETSTATUS calls 

AB (Auto Backup), 3-7 

ASDU (ASD Usage), 2-8 


attributes for dependent task accounting 


and file accounting, 3-38 
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automatic power schedule information, 
3-26 

BNAVERSION, 3-15 

BR (Breakout), 2-12 

CM (Change MCP), 3-2, 3-6 

CS (Change Supervisor), 3-6 

data comm group, 3-28 

DN (Dump Name), 3-8 

DO (Diagnostic Options), 3-10 

GC (Group Configuration), 3-10 

HOSTGROUB 3-15 

HOSTNAME, 3-15 

HS (Hold Schedule), 3-6 

HYPERchannel adapter statistics, 3-29 

LOGGING (Logging Options), 3-2, 3-33 

MB (Make Boot), 3-2 

MCP languages information returned 
(MASK bit 11), 3-15 

NETEX, 3-15 

network status, 3-20 

OP (Options), 3-6 

OT (Inspect Stack Cell), 2-10 

PD Print Directory, 4-1 

print information, 3-21 

PV (Print Volume), 5-1 

RF (Reliability Factor), 6-3 

RP (Resident Program), 3-2, 3-27 

SB (Substitute Backup), 3-8 

SB call, 9-79 

SECOPT (Security Options), 3-16 

security administrator status information, 
3-19 

SEGARRAYSTART (Array Segmentation 
Start Size), 3-15 

SF (Set Factor), 3-2, 3-8 

SL (Support Library), 3-2, 3-18, 3-31 

SUPPRESSWARNING, 3-3, 3-35 

SYSTEMACCOUNTING, 3-38 

SYSTEMLANGUAGE (Set Default 
Language for System Messages), 
3-15 : 

TI (Times), 2-11 

TIME ZONE NAME, 3-37 

TV (Type Volume), 5-3 

U (Utilization), 3-2 

Y (Status Interrogate), 2-6 


GETSTATUS directory calls 


TYPE parameter, 4-1 


GETSTATUS directory example, D-1 
GETSTATUS value returned from directory 


calls, 1-3 
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Group Configuration (GC) system command, 
3-4 


GSLINKINONPARTF field in GETSTATUS 
directory calls, 4—4 


H 


hard errors 
GETSTATUS, 1-3 
SETSTATUS, 7-2 
table, A-1 
hardware resource codes, C—1 
HI (Cause EXCEPTIONEVENT) 
SETSTATUS call, 8-18 
HLUNIT (Halt/Load Unit) 
GETSTATUS call, 3-23 
SETSTATUS call, 9-38 
HN (HOSTNAME) system command, 3-4 
HOSTGROUP 
GETSTATUS calls, 3-15 
, SETSTATUS call, 9-41 
HOSTNAME 
GETSTATUS calls, 3-15 
SETSTATUS call, 9-42 
HOSTNAME (HN) system command, 3-4 
HS (Hold Schedule) 
GETSTATUS call, 3-6 | 
SETSTATUS call, 9-43 
HU (Host Usercode) 
SETSTATUS call, 9-44 
HYPERchannel adapter statistics returned 
by GETSTATUS, 3-29 


ID (nitialize Data Comm) 
SETSTATUS call, 9-45 
ID (initialize Data Comm) system command, 
3-4, 3-28 
IL (Ignore Label) 
SETSTATUS call, 8-19 
INFOF field | 
in the GETSTATUS array parameter, 4-5 
Initialize Data Comm (ID) system command, 
34, 3-28 . 
INSERT IN SUPERVISOR QUEUE 
SETSTATUS call, 9-47 
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LB (Relabel Pack) 
SETSTATUS call, 12-14 
LC (Log Comment) SETSTATUS call, 9-48 
LEVELF field 
in GETSTATUS directory calls, 4-8, 4-9 
in the array parameter, 4-5 
LG (Log for Mix Number) 
SETSTATUS call, 8-20 
LH (Load Host) 
SETSTATUS call, 12-16, 12-17 
LINKF field 
in GETSTATUS directory calls, 4-8, 4-9 
- in the array parameter, 4-5 
LJ (Log to Job) 
SETSTATUS call, 8-21 
LOGGING (Logging Options) 
GETSTATUS call, 3-2, 3-33 
SETSTATUS call, 9-49 
LP (Lock Program) 
SETSTATUS call, 8-22 


M 


MA (May Access) 
SETSTATUS call, 9-52 
Make Boot (MB) system command, 3-24 
MASK parameter in GETSTATUS directory 
calls, 4—4 
MASK values, optional, 1-2 
MAXCATLEVELF field in GETSTATUS 
directory calls, 4-4 
MAXLEVELF field in GETSTATUS 
directory calls, 4—4 
MB (Make Boot) 
GETSTATUS call, 3-2, 3-24 
SETSTATUS call, 9-53 
MB (Make Boot) system command, 3~24 
MC (Change MCP) system command, 3-4 
MC (Make Compiler) 
SETSTATUS call, 9-54 
MCP languages 
information returned by GETSTATUS 
(MASK bit 11), 3-15 
MCSNAME to MCSNUMBER conversion, 
3-9 
MCSNUMBER to MCSNAME conversion, 
3-10 
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MDT (Memory Dump Type) system 
command, 3-22 
memory dump type 
GETSTATUS call, 3-22 
Memory Dump Type (MDT) system 
command, 3-22 
memory module information, 3—12 
MIRROR CREATE 
SETSTATUS call, 12-18 
MIRROR OPTION 
GETSTATUS call, 6-6 
SETSTATUS call, 12-20 
MIRROR RELEASE 
SETSTATUS call, 12-21 
miscellaneous requests 
GETSTATUS 
AB (Automatic Backup), 3-7 
attributes for dependent task 


accounting and file accounting, 3-38 
automatic power schedule information, 


3-26 
BNAVERSION, 3-15 
CM (Change MCP), 3-2, 3-6 
CS (Change Supervisor), 3-6 
data comm group, 3-28 
DN (Dump Name), 3-8 
DO (Diagnostic Options), 3-10 
GC (Group Configuration), 3-10 
HOSTGROUB 3-15 
HOSTNAME, 3-15 
HS (Hold Schedule), 3-6 


HYPERchannel adapter statistics, 3-29 
LOGGING (Logging Options), 8—2, 3-33 


MB (Make Boot), 3-2 

NETEX, 3~15 

OP (Options), 3-6 

resident program lists, 3-27 

RP (Resident Program), 3-2 

SB (Substitute Backup), 3-8 

SECOPT (Security Options), 3-16 

SEGARRAYSTART (Array 
Segmentation Start Size), 3-15 

SF (Set Factor), 3-2, 3-8 


SL (Support Library), 3-2, 3-18, 3-31 


SUPPRESSWARNING, 3-3 

SYSTEMLANGUAGE (Set Default 
Language for System Messages), 
3-15 

TIME ZONE NAMB, 3-37, 3-38 

U (Utilization), 3-2 

SETSTATUS 
AD (Access Duplicate) call, 9-5 
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AR (Archive Release) call, 9-7 

ARCCOPY (Archive Copy) call, 9-9 

ARCDUPLICATE (Archive Duplicate) 
call, 9-11 . 

ARCREPLACE (Archive Replace) call, 
9-13 

ASD (Actual Segment Descriptor) call, 
9~14 

AUTORESTORE (Archiving 
Autorestore Option) call, 9-15 

BNAVERSION, 9-16 

CF (Configuration File), 9-17 

CHANGE system file STATUS, 9-18 

CM (Change MCP), 9-19 ; 

COMPILERTARGET (Set Default 
TARGET Value), 9-21 

COPYCAT (Copy Active Catalog) call, 
9-23 

CP (Control Program), 9~24 

CS (Change Supervisor), 9-25 

DD (Directory Duplicate) call, 9-26 

DF (Empty Dumpdisk File), 9-28 

DL (Disk Location), 9-29 

DN (Dump Name), 9-32 

DR (Date Release), 9-33 

DRC (Disk Resource Control), 9-35 

DUMP (Dump Memory), 9-37 

HLUNIT (Halt/Load Unit), 9-38 

HOSTGROUBR 9-41 

HOSTNAME, 9-42 

HS (Hold Schedule), 9-43 

HU (Host Usercode), 9-44 

ID (Initialize Data Comm), 9-45 

INSERT IN SUPERVISOR QUEUE 
call, 9-47 

LC (Log Comment), 9-48 

LOGGING (Logging Options), 9-49 

MA (May Access), 9-52 

MB (Make Boot), 9-53 

MC (Make Compiler), 9~54 

MP(Mark Program), 9-55 

MU (Make Usercode), 9-57 

NETEX call, 9-59 

NETWORK INITIALIZATION AND 
TERMINATION, 9-61 

OP (Options), 9-65 

PB (Print Backup), 9-66 

PP (Privileged Program), 9-68 

RB (Rebuild Access), 9-70 

RECONFIGURE (Reconfigure System), 
9-71 

RES (Reserve), 9-73 
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RESTRICT FILE, 9-74 
RESTRICT VOLUME, 9-75 
RO (Reset Option), 9-77 
RP (Resident Program), 9-78 
SB (Substitute Backup), 9-79 
SBP (System Balancing Parameter), 
9-81 
SECOPT (Security Options), 9-83 
SEGARRAYSTART (Array 
Segmentation Start Size), 9-86 
SF (Set Factor), 9-87 
SI (System Intrinsics), 9-89 
SL (Support Library), 9-90 
SO (Set Option), 9-93 
SQUASH (Consolidate Disk Allocation), 
9-94 
SS (Send to Station), 9-95 
SUPPRESS (Suppress Display), 9-97 
SUPPRESSWARNING, 9-98 
SUSPEND/RESUME, 9-99 
SYSTEMACCOUNTING call, 9-101 
SYSTEMLANGUAGE, 9-103 
TL (Transfer Log), 9~-104 
TR (Time Reset), extended version, 
9-108 
TR (Time Reset), old version, 9-105 
XD (Bad Disk), 9-115 
XP (Executable Program), 9-116 | 
SUPPRESSWARNING, 3~35 
mix requests 
GETSTATUS 
ASDU (ASD Usage), 2-8 
BR (Breakout), 2-12 
OT (Inspect Stack Cell), 2-10 
TI (Times), 2-11 
- Y (Status Interrogate, 2-6 
SETSTATUS 
AX (Accept)call, 8-5 
DO (Diagnostic Options) call, 8-7 
DS (Discontinue) call, 8-8 
DUMP (Dump Memory) call, 8-10 
FA (File Attribute) call, 8-12 
FM (Form Message) call, 8-14 
FR (Final Reel) call, 8-16 
FS (Force Schedule) call, 8-17 
HI (Cause EXCEPTIONEVENT) call, 
8-18 
IL (Ignore Label) call, 8-19 
LG (Log for Mix Number) call, 8-20 
LJ (Log to Job) call, 8-21 
LP (Lock Program) call, 8-22 
NOTOK (No) call, 8-23 
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OF (Optional File) call, 8-24 
OK (Reactivate) call, 8-25 
OU (Output Unit) call, 8-26 
PR (Priority) call, 8-28 
QT (Quit) call, 8-29 
RESTART call, 8-30 
RM (Remove) call, 8-31 
SM (Send to MCS or Database) call, 
8-32 
STOP call, 8-33 
THAW (Thaw Frozen Library) call, 
8-34 
UL (Unlabeled) call, 8-35 
MODE (Input or Output Mode) 
SETSTATUS Call, 12-22 
MOVE (Move Pack) 
SETSTATUS Call, 12-24 
MP (Mark Program) 
SETSTATUS call, 9-55 
MU (Make Usercode) 
SETSTATUS call, 9-57 
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NET (BNAv1) command, 3-20 
NETEX 
GETSTATUS call, 3-15 
SETSTATUS call, 9-59 
NETEX (Support NETEX) system command, 
3-4 
NETWORK INITIALIZATION AND 
TERMINATION 
SETSTATUS call, 9-61 
network status 
GETSTATUS, 3-20 
NEXTLEVELLINKF field . 
in GETSTATUS directory calls, 4-8 
in the GETSTATUS array parameter, 4-5 
NOTOK (No) 
SETSTATUS call, 8-23 


O 


OF (Optional File) 
SETSTATUS call, 8-24 
OK (Reactivate) 
SETSTATUS call, 8-25, 9-99 
OL (Display Label and Paths) command, 6-1 
ONLYSYSTEMFILESF field in 
GETSTATUS directory calls, 4—2 


Index—7 


Index 


OP (Options) 
GETSTATUS call, 3-6 
SETSTATUS call, 9-65, 9-93 
system command 
corresponding SETSTATUS call, 9-77 
OP (OPtions) system command, 3-4 
open file information 
GETSTATUS call, 4-47 
OPtions (OP) system command, 3-4 
ORGLEVELF field in GETSTATUS 
directory calls, 4—4 
OT (Inspect Stack Cell) 
GETSTATUS call, 2-10 
OU (Output Unit) 
SETSTATUS call, 8-26 
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PA (Peripheral Association) 
GETSTATUS call, 6-6 
SETSTATUS call, 12-25 
PB (Print Backup) 
SETSTATUS call, 9-66 
PC system command, 3-4 
PD (Print Directory) 
' GETSTATUS call, 4-1 
PER (PERipheral Status) command, 6-1 
PERipheral Status (PER) command, 6-1 
PG (Purge) 
SETSTATUS call, 12-28 
PGL (Purge and Lock) 
SETSTATUS call, 12-28 
pointer word 
unit info, 6-14 
POWER (Power Up/Down) 
SETSTATUS call, 12-31 
POWER command 
SUBTYPE 56 GETSTATUS calls, 3-26 
PP (Privileged Program) 
SETSTATUS call, 9-68 
PR (Priority) 
SETSTATUS call, 8-28 
print information 
GETSTATUS, 3-21 
PS CONFIGURE system command 
see FORM (Assign Form ID), 12-9 
PV (Print Volume) 
GETSTATUS call, 5-1 
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QT (Quit) 
SETSTATUS call, 8-29 
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RB (Rebuild Access) 
SETSTATUS call, 9-70 
RC (Reconfigure Disk) 
SETSTATUS call, 12-33 
RECONFIGURE (Reconfigure System) 
SETSTATUS call, 9-71 
REPLACE (Replace Disk or Pack Volume) 
SETSTATUS call, 12-35 
Request Type categories 
GETSTATUS, 1-1 
SETSTATUS, 7-1 
RES (Reserve) 
SETSTATUS call, 9~73 


Resident Program (RP) system command, 


3-27 
resident program lists returned by 
GETSTATUS, 3-27 
RESIDENTSTATEF field 
in GETSTATUS directory calls, 4-8 


in the GETSTATUS array parameter, 4-5 


RESTART 

SETSTATUS call, 8-30 
RESTRICT DK 

SETSTATUS call, 12-37 
RESTRICT FILE 

SETSTATUS call, 9-74 
RESTRICT MT 

SETSTATUS call, 12-37 
RESTRICT ODT 

SETSTATUS call, 12-39 
RESTRICT PK 

SETSTATUS call, 12-37 
RESTRICT VOLUME 

SETSTATUS call, 9-75 
restricted ODTs, 6-12 
restricted units 

ODT, 6-3 
results returned from GETSTATUS 

directory calls, 4-6 . 

RESUME (SETSTATUS call), 9-99 


RETAINUSERCODEF field in GETSTATUS 


directory calls, 4-3 
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returned archive information for 
GETSTATUS directory calls, 4-18 
RETURNFULLNAMEF field in 
GETSTATUS directory calls, 4~3 
RETURNRESIDENTF field in GETSTATUS 
directory calls, 4-2 
RF (Reliability Factor) 
GETSTATUS call, 6-3 
RM (Remove) 
SETSTATUS call, 8-31 
RO (Reset Option) 
SETSTATUS call, 9-77 
RP (Resident Program) 
GETSTATUS call, 3-2 
SETSTATUS call, 9~78 
RP (Resident Program) system command, 
3-27 
RW (Rewind) 
SETSTATUS Call, 12-41 
RY (Ready) 
SETSTATUS call, 12-42 


S 


SB (Substitute Backup) 
GETSTATUS call, 3-8, 9-79 
SBP (System Balancing Parameter) 
SETSTATUS call, 9-81 
SC (System Configuration) system command, 
34 | 
SCAN (Scan Disk or Pack Volume) 
SETSTATUS call, 12-45 
SECOPT (Security Options) 
GETSTATUS call, 3-16 
SETSTATUS call, 9-83 
SECOPT (SECurity OPtions) system 
command, 3-4 
security administrator status information 
GETSTATUS, 3-19 
SECurity OPtions (SECOPT) system 
command, 3—4 
SEGARRAYSTART (Array Segmentation 
Start Size) 
GETSTATUS call, 3-15 
SEGARRAYSTART (Array Segmentation 
Start Size) SETSTATUS call, 9-86 
SEGARRAYSTART system command, 3-4 
SEND (Send Message) 
SETSTATUS call, 12-46 
Set Factor (SF) system command, 3-4 


_ SETSTATUS 
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errors, 7-2 
Request Type categories, 7-1 
SETSTATUS calls 

AB (Auto Backup, 12-3 

ACQUIRE (Acquire Resource), 12-5 

AD (Access Duplicate), 9-5 

ADM (Automatic Display Mode), 12-8 

AR (Archive Release), 9-7 

ARCCOPY (Archive Copy), 9-9 

ARCDUPLICATE (Archive Duplicate), 
9-11 

ARCHIVE RECORD ADD, 10-1 

ARCHIVE RECORD PURGE, 10-3 

ARCREPLACE (Archive Replace), 9-13 

ASD (Actual Segment Descriptor), 9-14 

AUTORESTORE (Archiving Autorestore 
Option), 9-15 

AX (Accept), 8-5 

BNAVERSION, 9-16 

CF (Configuration File), 9-17 

CHANGE system file STATUS call, 9-18 

CM (Change MCP), 9-19 

COMPILERTARGET (Set Default 
TARGET Value), 9-21 

COPYCAT (Copy Active Catalog), 9-23 

CP (Control Program), 9-24 

CS (Change Supervisor), 9-25 

DD (Directory Duplicate), 9-26 

DF (Empty Dumpdisk File), 9-28 

DL (Disk Location), 9-29 

DN (Dump Name), 9-32 

DO (Diagnostic Options), 8-7 

DR (Date Release), 9-33 

DRC (Disk Resource Control), 9-35 

DS (Discontinue), 8-8 

DUMP (Dump Memory), 8-10, 9-37 : 

FA (File Attribute), 8-12 

FM (Form Message), 8-14 

FORM (Assign Form ID), 12-9 

FR (Final Reel), 8-16 

FREE (Free Resource), 12-11 

FS (Force Schedule), 8-17 

HI (Cause EXCEPTIONEVENT), 8-18 

HLUNIT (Halt/Load Unit), 9-38 

HOSTGROUB 9-41 

HOSTNAME, 9-42 

HS (Hold Schedule), 9-43 

HU (Host Usercode), 9-44 

ID (initialize Data Comm), 9-45 

IL (Ignore Label), 8-19 

INSERT IN SUPERVISOR QUEUE, 9-47 

LB (Relabel Pack), 12-14 
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LC (Log Comment), 9-48 

LG (Log for Mix Number), 8-20 

LH (Load Host), 12~16, 12-17 

LJ (Log to Job), 8-21 

LOGGING (Logging Options), 9-49 

LP (Lock Program), 8-22 

MA (May Access), 9-52 

MB (Make Boot), 9-53 

MC (Make Compiler), 9-54 

MIRROR CREATE, 12-18 

MIRROR OPTION, 12-20 

MIRROR RELEASE, 12-21 

MODE (Input or Output Mode), 12-22 

MOVE (Move Pack), 12-24 

MP (Mark Program), 9-55 

MU (Make Usercode), 9-57 

NETEX, 9-59 

NETWORK INITIALIZATION AND 
TERMINATION, 9-61 

NOTOK (No), 8-23 

OF (Optional File), 8-24 

OK (Reactivate), 8-25 

_ OP (Options) call, 9-65 

OU (Output Unit), 8-26 

PA (Peripheral Association), 12-25 

PB (Print Backup), 9-66 

PG (Purge), 12-28 

PGL (Purge and Lock), 12-28 

POWER (Power Up/Down), 12-31 

PP (Privileged Program), 9-68 

PR (Priority), 8-28 

QT (Quit),8-29 

RB (Rebuild Access), 9-70 

RC (Reconfigure Disk), 12-33 

RECONFIGURE (Reconfigure System), 
9-71 

REPLACE (Replace Disk or Pack Volume), 
12-35 

RES (Reserve), 9-73 

RESTART, 8-30 

RESTRICT DK, 12-37 

RESTRICT FILE, 9-74 

RESTRICT MT, 12-37 

RESTRICT ODT, 12-39 

RESTRICT PK, 12-37 

. RESTRICT VOLUME, 9-75 

RESUME call, 9-99 

RM (Remove), 8-31 

RO (Reset Option) call, 9-77 

RP command, 9-78 

RW (Rewind), 12-41 

RY (Ready), 12-42 
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SBP (System Balancing Parameter), 9-81 
SCAN (Scan Pack or Disk Volume), 12—45 
SECOPT (Security Options) call, 9-83 
SEGARRAYSTART (Array Segmentation 
Start (Size), 9-86 
SEND (Send Message), 12-46 
SF (Set Factor) call, 9-87 
SI (System Intrinsics), 9-89 
SL (Support Library) call, 9-90 
SM (Send to MCS or Database ), 8-32 
SN (Serial Number), 12-47 
SNL (Serial Number Locked), 12-47 
SO (Set Option) call, 9-93 
SQUASH (Consolidate Disk Allocation), 
9-94 
SR (Secure Reader), 12-49 
SS (Send to Station), 9-95 
STOB, 8-33 . 
SUPPRESS (Suppress Display), 9-97 
SUPPRESSWARNING, 9-98 
SUSPEND/RESUME call, 9-99 
SV (Save), 12-50 
SYSTEMACCOUNTING, 9-101 
SYSTEMLANGUAGE call, 9-103 
TERM (Terminal), 12-52 
THAW (Thaw Frozen Library), 8-34 
TL (Transfer Log), 9-104 
TR (Time Reset) call 
extended version, 9-108 
old version, 9-105 
UL (Unlabeled), 8-35 
UR (Unit Reserved), 12-54 
VOLUME ADD, 11-1 
VOLUME DELETE, 11-5 
XD (Bad Disk) call, 9-115 
XP (Executable Program), 9-116 
SF (Set Factor) 
GETSTATUS call, 3-2, 3-8 
SETSTATUS call, 9-87 
SF (Set Factor) system command, 3-4 
SHOWOPEN (Show Open Files) 
GETSTATUS call, 4—47 
SI (System Intrinsics) SETSTATUS call, 
9-89 
SI (System Intrinsics) system command, 3-4 
SL (Support Library) 
GETSTATUS call, 3-2, 3-18, 3-31 
.SETSTATUS call, 9-90 
SL (Support Library) system command, 3-18 
SM (Send to MCS or Database) 
SETSTATUS call, 8-32 
SN (Serial Number) 


8600 0346-000 


SETSTATUS call, 12-47 
SNL (Serial Number Locked) 
SETSTATUS call, 12-47 
SO (Set Option) 
SETSTATUS call, 9-93 
soft error table for GETSTATUS and 
SETSTATUS, B-1 
soft error word 
definition, 1-3 
in GETSTATUS directory calls, 4-6 
soft errors 
GETSTATUS, 1-3 
SETSTATUS, 7-2 
common errors for mix requests, 8-3 
SQUASH (Consolidate Disk Allocation) 
SETSTATUS call, 9-94 
SR (Secure Reader) 
SETSTATUS call, 12-49 


SS (Send to Station) SETSTATUS call, 9-95 — 


ST (Stop) system command 
corresponding SETSTATUS call, 9-99 
stack info pointer word 
definition, 2-12 
structure, 2-12 
standard form 
examples 
plain, 10-4 
usercoded with family name, 9-52 
*file with family name, 9-23 
number of level in, 4-8 
to search usercode and nonusercode 
directories, 4~27 
STOP 
SETSTATUS call, 8-33 
SUBCLASS parameter in GETSTATUS 
directory calls, 4-4 
SUBCLASS values, optional, 1-2 
substandard form name, definition, 1-2 
SUBTYPEF field in GETSTATUS directory 
calls, 4-1 
SUBVALUEIF subfield 
in GETSTATUS directory calls, 4-7 
in the array parameter, 4-5 
SUBVALUE2F subfield 
in GETSTATUS directory calls, 4-7 
in the array parameter, 4-5 
SUBVALUESF subfield 
in GETSTATUS directory calls, 4-7 
in the array parameter, 4-5 
supervisor queue, inserting message in 
(SETSTATUS call), 9-47 
Support Library (SL) system command, 3-18 
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support library information returned by 
GETSTATUS, 3-31 
Support NETEX (NETEX) system command, 
3—4 
SUPPRESS (Suppress Display) 
SETSTATUS call, 9-97 
SUPPRESSWARNING 
GETSTATUS call, 3-3, 3-35 
SETSTATUS call, 9-98 
SUSPEND/RESUME 
(SETSTATUS call), 9-99 
SV (Save) 
SETSTATUS call, 12-50 
system command 
OP (Options) 
SETSTATUS call, 9-77 
System Configuration (SC) system command, 
3—4 
system directories 
copying with a GETSTATUS call, 440 
System Intrinsics (SI) system command, 3-4 
SYSTEMACCOUNTING 
GETSTATUS call, 3-38 
SETSTATUS call, 9-101 
SYSTEMLANGUAGE (Set Default 
Language for System Messages) 
GETSTATUS calls, 3-15 
SETSTATUS call, 9-103 
SYSTEMLANGUAGE system command, 3-4 
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tape volume GETSTATUS calls, 5-1 
TERM (Terminal) 
SETSTATUS call, 12-52 
THAW (Thaw Frozen Library) 
SETSTATUS call, 8-34 
TI (Times) 
GETSTATUS call, 2-11 
TIME ZONE NAME 
GETSTATUS call, 3-37 
TL (Transfer Log) 
SETSTATUS call, 9-104 
TL system command 
see TL (Transfer Log) SETSTATUS call, 
9-104 
TR (Time Reset) 
extended version 
SETSTATUS call, 9-108 
old version 
SETSTATUS call, 9-105 
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TV (Type Volume) 
GETSTATUS call, 5-3 
TYPE parameter in GETSTATUS directory 
calls, 4-1 
TYPEF field in GETSTATUS directory calls, 
4-1 


U 


U (Utilization) 
GETSTATUS call, 3~2 
UL (Unlabeled) 
SETSTATUS call, 8-35 
unit info pointer word, 6-14 
unit requests 
GETSTATUS 
PA (Peripheral Association), 6-6 
RF (Reliability Factor), 6-3 
SETSTATUS 
AB (Auto Backup), 12-3 
ACQUIRE (Acquire Resource), 12-5 
ADM (Automatic Display Mode), 12-8 
FORM (Assign Form ID), 12-9 
FREE (Free Resource), 12-11 
LB (Relabel Pack), 12-14 
LH (Load Host), 12-16, 12-17 
MIRROR CREATE, 12-18 
MIRROR OPTION, 12-20 
MIRROR RELEASE, 12-21 
MODE (Input or Output Mode), 12-22 
MOVE (Move Pack), 12-24 : 
PA (Peripheral Association), 12-25 
PG (Purge), 12-28 
PGL (Purge and Lock), 12-28 
POWER (Power Up/Down), 12-31 
RC (Reconfigure Disk), 12-33 
REPLACE (Replace Disk or Pack 
Volume), 12-35 
RESTRICT DK, 12-37 
RESTRICT MT, 12-37 
RESTRICT ODT, 12-39 
RESTRICT PK, 12-37 
RW (Rewind), 12-41 
RY (Ready), 12-42 
SCAN (Scan Disk or Pack Volume), 
12-45 
SEND (Send Message), 12-46 
SN (Serial Number), 12-47 
SNL (Serial Number Locked), 12-47 
SR (Secure Reader), 12-49 
SV (Save), 12-50 
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TERM (Terminal), 12-52 
UR (Unit Reserved), 12-54 
unit type codes, C-1 
UNITTYPE codes, C~1 
UR (Unit Reserved) 
SETSTATUS call, 12-54 
USERCODEONLYF field in GETSTATUS 
directory calls, 4-3 


V 


VALUEF field 
in GETSTATUS directory calls, 4—7, 4-9 
in the GETSTATUS array parameter, 4—5 
VOLUME ADD 
SETSTATUS call, 11-1 
VOLUME DELETE - 
SETSTATUS call, 11- 
volume directory : 
copying with a GETSTATUS call, 4-42 
GETSTATUS calls, 5-1 | 
volume library 
copying with a GETSTATUS call, 4-38 
GETSTATUS calls, 5-1 


volume requests 


SETSTATUS 
VOLUME ADD, 1i-1 


W 


WAITFORFILEF field in GETSTATUS 
directory calls, 4-3 

What MCP (WM) system command, 3-4 

WM (What MCP) system command, 3-4 


X 
XD (Bad Disk) 
SETSTATUS call, 9-115 
XP (Executable Program) 
SETSTATUS call, 9-116 
X25 (X25MCS) command, 3-20 
X25MCS (X25) command, 3-20 
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Y (Status Interrogate) 
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